From: "Pierre Chopin" <pierre.chopin@u-psud.fr>
To: "Sebastien Mondet" <sebastien.mondet@gmail.com>
Cc: "Pierre Chopin" <pierre.chopin@u-psud.fr>, caml-list@inria.fr
Subject: Re: [Caml-list] pgocaml and lwt
Date: Sun, 30 Sep 2012 15:37:55 -0700 [thread overview]
Message-ID: <a3c53394626a5fd685e830d2604dea3b.squirrel@webmail.u-psud.fr> (raw)
In-Reply-To: <CALScVYkQS+P4GjXe8RdHmj+OO0FEL-bJzHFWdMQWE8OekQuT1g@mail.gmail.com>
It was indeed the problem.
Thanks !
Le Dim 30 septembre 2012 15:31, Sebastien Mondet a écrit :
> Hi
>
>
> If I remember correctly, the syntax extension will use the module called
> PGOCaml which is "in scope", so you need to hide the "preemtive threads"
> one with yours:
>
> module PGOCaml = PGOCaml_generic.Make(Thread)
>
>
> Cheers
> Seb
>
>
>
> On Sun, Sep 30, 2012 at 6:04 PM, Pierre Chopin
> <pierre.chopin@u-psud.fr>wrote:
>
>
>> Hi,
>> I am trying to use pgocaml and lwt, but I have some error I can't
>> understand:
>>
>>
>> (**********************************************)
>> (**********************************************)
>>
>>
>>
>> module Thread = struct open Lwt open Lwt_io type 'a t = 'a Lwt.t let
(>>=) =
>> (>>=)
>> let return = return let fail = fail type in_channel = input_channel type
>> out_channel = output_channel let open_connection addr = open_connection
>> ~buffer_size:2097152 addr
>> let output_char = write_char let output_binary_int = write_int let
>> output_string = write let flush = flush let input_char = read_char let
>> input_binary_int = read_int let really_input =read_into_exactly let
>> close_in = close end
>>
>>
>> module Lwt_db = PGOCaml_generic.Make(Thread) open Lwt_db
>>
>> open Lwt
>>
>> let query_user dbh id = PGSQL(dbh) "SELECT id,name,visited FROM user_db
>> WHERE id=$id"
>>
>>
>> let _ = Lwt_main.run
>> (connect ~database:"schat" ()>|=
>> function dbh -> query_user dbh 1L)
>>
>> (**********************************************)
>> (**********************************************)
>>
>>
>> when I try to compile :
>>
>>
>> $ ocamlfind ocamlc -thread -c -package lwt,pgocaml,pgocaml.syntax
>> -syntax
>> camlp4o test.ml
>>
>> File "test.ml", line 34, characters 30-33:
>> Error: This expression has type
>> 'a Lwt_db.t = 'a PGOCaml_generic.Make(Thread).t
>> but an expression was expected of type (string, bool) Hashtbl.t PGOCaml.t
>>
>>
>>
>>
>>
>> --
>> Caml-list mailing list. Subscription management and archives:
>> https://sympa.inria.fr/sympa/arc/caml-list
>> Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
>> Bug reports: http://caml.inria.fr/bin/caml-bugs
>>
>>
>
> --
> Caml-list mailing list. Subscription management and archives:
> https://sympa.inria.fr/sympa/arc/caml-list
> Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
> Bug reports: http://caml.inria.fr/bin/caml-bugs
prev parent reply other threads:[~2012-09-30 22:37 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-09-30 22:04 Pierre Chopin
2012-09-30 22:31 ` Sebastien Mondet
2012-09-30 22:37 ` Pierre Chopin [this message]
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=a3c53394626a5fd685e830d2604dea3b.squirrel@webmail.u-psud.fr \
--to=pierre.chopin@u-psud.fr \
--cc=caml-list@inria.fr \
--cc=sebastien.mondet@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox