X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fmathql_interpreter%2Fmqint.mli;h=4145153088bd8a059b1f96ff30f861486e1dbd5b;hb=b1fb6b8e1767d775bc452303629e95941d142bea;hp=60f00f50c3da307f028ad0826d8f7eaa5147668d;hpb=1cfcea66d7394a785ec439cd6b03497b276918c4;p=helm.git

diff --git a/helm/ocaml/mathql_interpreter/mqint.mli b/helm/ocaml/mathql_interpreter/mqint.mli
index 60f00f50c..414515308 100644
--- a/helm/ocaml/mathql_interpreter/mqint.mli
+++ b/helm/ocaml/mathql_interpreter/mqint.mli
@@ -23,23 +23,24 @@
  * http://cs.unibo.it/helm/.
  *)
 
-(*
- * interfaccia dell'interprete MathQL
- *)
+val init         : string -> unit                (* open database *)
 
-open MathQL;;
+val execute      : MathQL.query -> MathQL.result (* execute query *)
 
-(*
- * inizializzazione del database
- *)
-val init: unit -> unit
+val close        : unit -> unit                  (* close database *)
+
+val check        : unit -> unit                  (* check connection *)
+
+val set_stat     : bool -> unit                  (* set stat emission *)
+
+val get_stat     : unit -> bool                  (* check stat emission *)
+
+val postgres_db   : string			 (* postgres *)	
+
+val galax_db     : string			 (* galax *)
+
+val set_database : string -> unit                (* switch postgres/galax *)
+
+val get_database : unit -> string                (* check db used *)
 
-(*
- * esecuzione di query
- *)
-val execute: mquery -> mqresult;;
 
-(*
- * chiusura del database
- *)
-val close: unit -> unit