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 d6b9d3f33f6eab69bfa54eeeda8d2bde2437bd4e..cbbf3929dbdddde9d77ac522a1db6fd1b5d86b14 100644 (file)
--- a/helm/ocaml/mathql_interpreter/mQIPostgres.mli
+++ b/helm/ocaml/mathql_interpreter/mQIPostgres.mli
@@ -23,10 +23,14 @@
  * http://cs.unibo.it/helm/.
  *)
 
-val init  : unit -> Postgres.connection option
+(*  AUTOR: Ferruccio Guidi <fguidi@cs.unibo.it>
+ *)
 
-val close : Postgres.connection option -> unit
+val init  : unit -> Postgres.connection
 
-val exec  : Postgres.connection option -> string -> string list list
+val close : Postgres.connection -> unit
 
-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