Mercurial > urweb
diff src/mysql.sml @ 882:9c1b7e46eed2
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