sig
  val connect :
    string ->
    ?host:string ->
    ?port:string ->
    ?user:string -> ?password:string -> string -> Dbi.connection
  val database_types : unit -> string list
  val register :
    string ->
    (?host:string ->
     ?port:string ->
     ?user:string -> ?password:string -> string -> Dbi.connection) ->
    unit
end