Mercurial > urweb

diff src/mysql.sml @ 882:9c1b7e46eed2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
MySQL CGI working
author Adam Chlipala <adamc@hcoop.net>
date Fri, 17 Jul 2009 12:58:37 -0400
parents 8e9f2d247dba
children ced093080e17
line wrap: on
line diff
--- a/src/mysql.sml	Fri Jul 17 12:34:00 2009 -0400
+++ b/src/mysql.sml	Fri Jul 17 12:58:37 2009 -0400
@@ -487,7 +487,9 @@
 
                       string "}"]
              else
-                 string "static void uw_db_prepare(uw_context ctx) { }",
+                 box [string "static void uw_db_prepare(uw_context ctx) { }",
+                      newline,
+                      string "static void uw_db_validate(uw_context ctx) { }"],
              newline,
              newline,
              
@@ -1445,6 +1447,7 @@
                   createSequence = fn s => "CREATE TABLE " ^ s ^ " (id INTEGER PRIMARY KEY AUTO_INCREMENT)",
                   textKeysNeedLengths = true,
                   supportsNextval = false,
-                  supportsNestedPrepared = false}
+                  supportsNestedPrepared = false,
+                  sqlPrefix = "SET storage_engine=InnoDB;\n"}
 
 end