* http://cs.unibo.it/helm/.
*)
-val init : string -> unit (* open database *)
+val init : string -> unit (* open database *)
-val execute : MathQL.query -> MathQL.result (* execute query *)
+val execute : MathQL.query -> MathQL.result (* execute query *)
-val close : unit -> unit (* close database *)
+val close : unit -> unit (* close database *)
-val check : unit -> Postgres.connection (* controllo connessione *)
+val check : unit -> Postgres.connection (* check connection *)
+
+val set_stat : bool -> unit (* set stat emission *)
+
+val get_stat : unit -> bool (* check stat emission *)