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 afc75b051084c71fd2ad7582ed0eb117b5acec44..cbbf3929dbdddde9d77ac522a1db6fd1b5d86b14 100644 (file)
--- a/helm/ocaml/mathql_interpreter/mQIPostgres.mli
+++ b/helm/ocaml/mathql_interpreter/mQIPostgres.mli
@@ -30,9 +30,7 @@ val init  : unit -> Postgres.connection
 
 val close : Postgres.connection -> unit
 
-val exec  : Postgres.connection -> 
+val exec  : Postgres.connection * (MQITypes.query -> unit) -> 
             MQITypes.table -> MQITypes.columns ->
            string MQITypes.con_true -> string MQITypes.con_false ->
-           MQITypes.result * MQITypes.query
-
-
+           MQITypes.result