diff options
Diffstat (limited to 'src/mysql.sml')
-rw-r--r-- | src/mysql.sml | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/mysql.sml b/src/mysql.sml index b791a93c..976fefef 100644 --- a/src/mysql.sml +++ b/src/mysql.sml @@ -186,7 +186,7 @@ fun init (dbstring, ss) = newline, string "}", newline, - string "conn = malloc(sizeof(conn));", + string "conn = calloc(1, sizeof(conn));", newline, string "conn->conn = mysql;", newline, @@ -253,6 +253,9 @@ fun init (dbstring, ss) = 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 @@ val () = addDbms {name = "mysql", newline], string "}", newline], - init = init} + init = init, + query = query, + queryPrepared = queryPrepared} end |