| Index: third_party/sqlite/src/src/test_async.c
 | 
| diff --git a/third_party/sqlite/src/src/test_async.c b/third_party/sqlite/src/src/test_async.c
 | 
| index b0b943185bfc23c17fd08f55768cac12a9f56951..c32c74c6608142d36e6a7d323b56877983eff301 100644
 | 
| --- a/third_party/sqlite/src/src/test_async.c
 | 
| +++ b/third_party/sqlite/src/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,
 | 
| 
 |