diff options
author | danielk1977 <danielk1977@noemail.net> | 2004-06-12 01:43:26 +0000 |
---|---|---|
committer | danielk1977 <danielk1977@noemail.net> | 2004-06-12 01:43:26 +0000 |
commit | 2a764eb0cd9755ff464c9ef7c900e3fd8feef0cc (patch) | |
tree | 162f21e267994ef0e245be0569155a9299026b47 /src/tclsqlite.c | |
parent | dc8453fd7acab7acdcbf68c5ef13717e8e8e6587 (diff) | |
download | sqlite-2a764eb0cd9755ff464c9ef7c900e3fd8feef0cc.tar.gz sqlite-2a764eb0cd9755ff464c9ef7c900e3fd8feef0cc.zip |
Change prototype for busy callbacks to "int xBusy(void *, int);" (CVS 1573)
FossilOrigin-Name: 4f1cfca5ca703d0068cf8d6222dc8e0cfb7e24b6
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r-- | src/tclsqlite.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index af4131a71..c0b751a60 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.83 2004/06/10 10:50:38 danielk1977 Exp $ +** $Id: tclsqlite.c,v 1.84 2004/06/12 01:43:27 danielk1977 Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -149,7 +149,7 @@ static void DbDeleteCmd(void *db){ ** This routine is called when a database file is locked while trying ** to execute SQL. */ -static int DbBusyHandler(void *cd, const char *zTable, int nTries){ +static int DbBusyHandler(void *cd, int nTries){ SqliteDb *pDb = (SqliteDb*)cd; int rc; char zVal[30]; @@ -158,9 +158,8 @@ static int DbBusyHandler(void *cd, const char *zTable, int nTries){ Tcl_DStringInit(&cmd); Tcl_DStringAppend(&cmd, pDb->zBusy, -1); - Tcl_DStringAppendElement(&cmd, zTable); - sprintf(zVal, " %d", nTries); - Tcl_DStringAppend(&cmd, zVal, -1); + sprintf(zVal, "%d", nTries); + Tcl_DStringAppendElement(&cmd, zVal); zCmd = Tcl_DStringValue(&cmd); rc = Tcl_Eval(pDb->interp, zCmd); Tcl_DStringFree(&cmd); |