Mercurial > urweb

diff src/mysql.sml @ 1073:b2311dfb3158

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initializers and setval
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Dec 2009 14:20:41 -0500
parents ea9f03ac2710
children db52c32dbe42
line wrap: on
line diff
--- a/src/mysql.sml	Sun Dec 13 13:00:55 2009 -0500
+++ b/src/mysql.sml	Sun Dec 13 14:20:41 2009 -0500
@@ -1503,6 +1503,8 @@
 
 fun nextvalPrepared _ = raise Fail "MySQL.nextvalPrepared called"
 
+fun setval _ = raise Fail "MySQL.setval called"
+
 fun sqlifyString s = "'" ^ String.translate (fn #"'" => "\\'"
                                               | #"\\" => "\\\\"
                                               | ch =>
@@ -1529,6 +1531,7 @@
                   dmlPrepared = dmlPrepared,
                   nextval = nextval,
                   nextvalPrepared = nextvalPrepared,
+                  setval = setval,
                   sqlifyString = sqlifyString,
                   p_cast = p_cast,
                   p_blank = p_blank,