module DbMemory:sig
..end
typedbinfo =
unit
typedatabase =
(string, string list) Hashtbl.t
val connect : unit -> ('a, 'b) Hashtbl.t
val disconnect : 'a -> unit
val init_db : 'a -> 'b -> unit
val create_data : (string, string list) Hashtbl.t ->
string ->
?log:bool -> ?visibility:Util.visibility -> 'a -> string -> 'b -> 'b Db.data