diff options
| author | mistachkin <mistachkin@noemail.net> | 2016-07-28 18:06:52 +0000 |
|---|---|---|
| committer | mistachkin <mistachkin@noemail.net> | 2016-07-28 18:06:52 +0000 |
| commit | a121cc7c60e13e5dae02176631a72e3333f70302 (patch) | |
| tree | ab172bdc2dbaa1a2ae2122c0602f74ab0e516432 /src/tclsqlite.c | |
| parent | 7617e4a8a4564689a839cf116dae0012b4753a65 (diff) | |
| download | sqlite-a121cc7c60e13e5dae02176631a72e3333f70302.tar.gz sqlite-a121cc7c60e13e5dae02176631a72e3333f70302.zip | |
Adjustments to get 'testfixture.exe' compiling with Tcl 8.6 when __stdcall is enabled.
FossilOrigin-Name: 90e89ec9c8efff057a9e43c612427fc5c97ab52d
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 527dc488e..bc94a5ff7 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -1151,7 +1151,7 @@ static char *local_getline(char *zPrompt, FILE *in){ ** It is invoked after evaluating the script SCRIPT to commit or rollback ** the transaction or savepoint opened by the [transaction] command. */ -static int DbTransPostCmd( +static int SQLITE_TCLAPI DbTransPostCmd( ClientData data[], /* data[0] is the Sqlite3Db* for $db */ Tcl_Interp *interp, /* Tcl interpreter */ int result /* Result of evaluating SCRIPT */ @@ -1698,7 +1698,7 @@ static int DbUseNre(void){ ** ** $db eval SQL ?ARRAYNAME? SCRIPT */ -static int DbEvalNextCmd( +static int SQLITE_TCLAPI DbEvalNextCmd( ClientData data[], /* data[0] is the (DbEvalContext*) */ Tcl_Interp *interp, /* Tcl interpreter */ int result /* Result so far */ @@ -3256,7 +3256,7 @@ static int SQLITE_TCLAPI DbObjCmd( ** Adaptor that provides an objCmd interface to the NRE-enabled ** interface implementation. */ -static int DbObjCmdAdaptor( +static int SQLITE_TCLAPI DbObjCmdAdaptor( void *cd, Tcl_Interp *interp, int objc, |