Mercurial > urweb

comparison src/postgres.sml @ 876:025806b3c014

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Demo compiles again with Postgres and MySQL; MySQL version lacks sequence code and so doesn't work yet
author Adam Chlipala <adamc@hcoop.net>
date Sun, 12 Jul 2009 16:09:54 -0400
parents 3c7b48040dcf
children dae141d911d9
comparison
equal deleted inserted replaced
875:c50101ddf7fa 876:025806b3c014
245 newline] 245 newline]
246 end 246 end
247 247
248 fun init {dbstring, prepared = ss, tables, views, sequences} = 248 fun init {dbstring, prepared = ss, tables, views, sequences} =
249 box [if #persistent (currentProtocol ()) then 249 box [if #persistent (currentProtocol ()) then
250 box [string "void uw_client_init() { }", 250 box [string "void uw_client_init(void) { }",
251 newline, 251 newline,
252 newline, 252 newline,
253 253
254 string "static void uw_db_validate(uw_context ctx) {", 254 string "static void uw_db_validate(uw_context ctx) {",
255 newline, 255 newline,