module type DBI_DRIVER =sig..end
type 
val connect : ?host:string ->
       ?port:string ->
       ?user:string ->
       ?password:string -> string -> connectionval close : connection -> unitval closed : connection -> boolval commit : connection -> unitval ping : connection -> boolval rollback : connection -> unit