Mercurial > urweb
diff src/settings.sig @ 878:a8952047e1d3
Sequence code compiles in MySQL
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 16 Jul 2009 16:29:13 -0400 |
parents | dae141d911d9 |
children | b2a175a0f2ef |
line wrap: on
line diff
--- a/src/settings.sig Thu Jul 16 13:59:30 2009 -0400 +++ b/src/settings.sig Thu Jul 16 16:29:13 2009 -0400 @@ -142,14 +142,15 @@ dml : ErrorMsg.span -> Print.PD.pp_desc, dmlPrepared : {loc : ErrorMsg.span, id : int, dml : string, inputs : sql_type list} -> Print.PD.pp_desc, - nextval : ErrorMsg.span -> Print.PD.pp_desc, + nextval : {loc : ErrorMsg.span, seqE : Print.PD.pp_desc, seqName : string option} -> Print.PD.pp_desc, nextvalPrepared : {loc : ErrorMsg.span, id : int, query : string} -> Print.PD.pp_desc, sqlifyString : string -> string, p_cast : string * sql_type -> string, p_blank : int * sql_type -> string (* Prepared statement input *), supportsDeleteAs : bool, createSequence : string -> string, - textKeysNeedLengths : bool + textKeysNeedLengths : bool, + supportsNextval : bool } val addDbms : dbms -> unit