diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-07-17 12:58:37 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-07-17 12:58:37 -0400 |
commit | ed6d1a7b126f5140f6c0821db4289b19ee76ca8d (patch) | |
tree | 0a5ee98e028ce9b02f2ba341da4ef81846d3c68e /src/mysql.sml | |
parent | 80811734c721221a20260f79387256043c732917 (diff) |
MySQL CGI working
Diffstat (limited to 'src/mysql.sml')
-rw-r--r-- | src/mysql.sml | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/mysql.sml b/src/mysql.sml index eef05a6a..65e62588 100644 --- a/src/mysql.sml +++ b/src/mysql.sml @@ -487,7 +487,9 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = 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 @@ val () = addDbms {name = "mysql", 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 |