module Error: sig .. end
sig
end
type database = [ `Close | `Exec of string * string list | `Fetching_node of string | `Load of string | `Parsing of string ] * [ `Exn of string | `Pointer_loop_max_depth of int ]
[ `Close | `Exec of string * string list | `Fetching_node of string | `Load of string | `Parsing of string ] * [ `Exn of string | `Pointer_loop_max_depth of int ]
val database_to_string : database -> string
database -> string