ocaml 3.09 transition

[helm.git] / helm / ocaml / mathql_interpreter / mQIPostgres.mli

diff --git a/helm/ocaml/mathql_interpreter/mQIPostgres.mli b/helm/ocaml/mathql_interpreter/mQIPostgres.mli
index 8fa7acc3b0bc33f3df32bd550c90841b7f8db06a..cbbf3929dbdddde9d77ac522a1db6fd1b5d86b14 100644 (file)
--- a/helm/ocaml/mathql_interpreter/mQIPostgres.mli
+++ b/helm/ocaml/mathql_interpreter/mQIPostgres.mli
@@ -26,12 +26,11 @@
 (*  AUTOR: Ferruccio Guidi <fguidi@cs.unibo.it>
  *)
 
-type connection
+val init  : unit -> Postgres.connection
 
-val init  : string -> connection option
+val close : Postgres.connection -> unit
 
-val close : connection option -> unit
-
-val exec  : connection option -> string -> string list list
-
-val quote : string -> string
+val exec  : Postgres.connection * (MQITypes.query -> unit) -> 
+            MQITypes.table -> MQITypes.columns ->
+           string MQITypes.con_true -> string MQITypes.con_false ->
+           MQITypes.result