Commits

Anonymous committed beb703d

Dbi_pg: + statement#finish (), + withres_stmt

Comments (0)

Files changed (1)

src/dbi/dbi_pg.ml

       )
     ;
 
+    (* will be implemented as "cleaning prepared statement"
+       when postgresql-ocaml will provide such functionality. *)
+    method finish () = ()
+    ;
+
   end
 ;
 
 
 value connection_eq (c1 : connection) (c2 : connection) = (c1 == c2)
 ;
+
+
+open WithM.WithI
+;
+
+value withres_stmt : withres (connection * string) (statement)
+=
+  { cons = fun (conn, sql) -> conn#prepare sql
+  ; fin = fun stmt -> stmt#finish ()
+  }
+;