Mercurial > urweb
diff src/mysql.sml @ 867:e7f80d78075b
Moved query code into Settings
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 28 Jun 2009 16:03:00 -0400 |
parents | 03e7f111fe99 |
children | 06497beb265b |
line wrap: on
line diff
--- a/src/mysql.sml Sun Jun 28 13:49:32 2009 -0400 +++ b/src/mysql.sml Sun Jun 28 16:03:00 2009 -0400 @@ -186,7 +186,7 @@ newline, string "}", newline, - string "conn = malloc(sizeof(conn));", + string "conn = calloc(1, sizeof(conn));", newline, string "conn->conn = mysql;", newline, @@ -253,6 +253,9 @@ newline] end +fun query _ = raise Fail "MySQL query" +fun queryPrepared _ = raise Fail "MySQL queryPrepared" + val () = addDbms {name = "mysql", header = "mysql/mysql.h", link = "-lmysqlclient", @@ -268,6 +271,8 @@ newline], string "}", newline], - init = init} + init = init, + query = query, + queryPrepared = queryPrepared} end