From 129b1c431efebc77a7a0046c725380ba29b814cf Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 27 Dec 2009 10:37:24 -0500 Subject: All three current protocols work with move to using uw_app --- src/sqlite.sml | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'src/sqlite.sml') diff --git a/src/sqlite.sml b/src/sqlite.sml index 440c7c28..485e43b4 100644 --- a/src/sqlite.sml +++ b/src/sqlite.sml @@ -156,7 +156,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, newline, - string "void uw_client_init(void) {", + string "static void uw_client_init(void) {", newline, box [string "uw_sqlfmtInt = \"%lld%n\";", newline, @@ -256,7 +256,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, newline, - string "void uw_db_init(uw_context ctx) {", + string "static void uw_db_init(uw_context ctx) {", newline, string "sqlite3 *sqlite;", newline, @@ -283,7 +283,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, newline, - string "void uw_db_close(uw_context ctx) {", + string "static void uw_db_close(uw_context ctx) {", newline, string "uw_conn *conn = uw_get_db(ctx);", newline, @@ -302,7 +302,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, newline, - string "int uw_db_begin(uw_context ctx) {", + string "static int uw_db_begin(uw_context ctx) {", newline, string "uw_conn *conn = uw_get_db(ctx);", newline, @@ -321,7 +321,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, string "}", newline, - string "int uw_db_commit(uw_context ctx) {", + string "static int uw_db_commit(uw_context ctx) {", newline, string "uw_conn *conn = uw_get_db(ctx);", newline, @@ -341,7 +341,7 @@ fun init {dbstring, prepared = ss, tables, views, sequences} = newline, newline, - string "int uw_db_rollback(uw_context ctx) {", + string "static int uw_db_rollback(uw_context ctx) {", newline, string "uw_conn *conn = uw_get_db(ctx);", newline, -- cgit v1.2.3