functor (Dbi_driver : DbiDriverT->
  sig
    type connection = Dbi_driver.connection
    val get :
      CamlGI.Cgi.Request.t ->
      ?host:string ->
      ?port:string ->
      ?user:string ->
      ?password:string -> string -> CamlGI.DbiPool.DbiPool.connection
  end