aboutsummaryrefslogtreecommitdiff
path: root/src/test_async.c
diff options
context:
space:
mode:
authordrh <drh@noemail.net>2016-07-28 18:55:57 +0000
committerdrh <drh@noemail.net>2016-07-28 18:55:57 +0000
commit3a22fdab9a40e54065b36b48daadf00fcffd4565 (patch)
tree162ae7a09a5698549f3d14e0ad7d87390ca5a4ef /src/test_async.c
parenta8914faaaa981c87f193eb62477e7ba7d0affeed (diff)
parentc0bebc1dcfe7711b80d3a3333d35c991849785ed (diff)
downloadsqlite-3a22fdab9a40e54065b36b48daadf00fcffd4565.tar.gz
sqlite-3a22fdab9a40e54065b36b48daadf00fcffd4565.zip
Decorate all interfaces with calling convention macros.
FossilOrigin-Name: fd784887e125bf95f4799ad09cbcba6795173487
Diffstat (limited to 'src/test_async.c')
-rw-r--r--src/test_async.c19
1 files changed, 13 insertions, 6 deletions
diff --git a/src/test_async.c b/src/test_async.c
index b0b943185..c32c74c66 100644
--- a/src/test_async.c
+++ b/src/test_async.c
@@ -15,7 +15,14 @@
*/
#define TCL_THREADS
-#include <tcl.h>
+#if defined(INCLUDE_SQLITE_TCL_H)
+# include "sqlite_tcl.h"
+#else
+# include "tcl.h"
+# ifndef SQLITE_TCLAPI
+# define SQLITE_TCLAPI
+# endif
+#endif
#ifdef SQLITE_ENABLE_ASYNCIO
@@ -36,7 +43,7 @@ TCL_DECLARE_MUTEX(testasync_g_writerMutex);
/*
** sqlite3async_initialize PARENT-VFS ISDEFAULT
*/
-static int testAsyncInit(
+static int SQLITE_TCLAPI testAsyncInit(
void * clientData,
Tcl_Interp *interp,
int objc,
@@ -69,7 +76,7 @@ static int testAsyncInit(
/*
** sqlite3async_shutdown
*/
-static int testAsyncShutdown(
+static int SQLITE_TCLAPI testAsyncShutdown(
void * clientData,
Tcl_Interp *interp,
int objc,
@@ -93,7 +100,7 @@ static Tcl_ThreadCreateType tclWriterThread(ClientData pIsStarted){
**
** Start a new writer thread.
*/
-static int testAsyncStart(
+static int SQLITE_TCLAPI testAsyncStart(
void * clientData,
Tcl_Interp *interp,
int objc,
@@ -125,7 +132,7 @@ static int testAsyncStart(
** If the current writer thread is set to run forever then this
** command would block forever. To prevent that, an error is returned.
*/
-static int testAsyncWait(
+static int SQLITE_TCLAPI testAsyncWait(
void * clientData,
Tcl_Interp *interp,
int objc,
@@ -151,7 +158,7 @@ static int testAsyncWait(
/*
** sqlite3async_control OPTION ?VALUE?
*/
-static int testAsyncControl(
+static int SQLITE_TCLAPI testAsyncControl(
void * clientData,
Tcl_Interp *interp,
int objc,