* 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