diff options
| author | drh <drh@noemail.net> | 2008-04-10 13:42:56 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2008-04-10 13:42:56 +0000 |
| commit | e5fb98af234620121a35b9a0c36adbaa3bd5887a (patch) | |
| tree | beb853819e93f9f7f1c87835ff40ab924bb8eb17 /src/tclsqlite.c | |
| parent | d9b97cf3efb79a441a59b93d45e109881122ba2d (diff) | |
| download | sqlite-e5fb98af234620121a35b9a0c36adbaa3bd5887a.tar.gz sqlite-e5fb98af234620121a35b9a0c36adbaa3bd5887a.zip | |
Fix to the "copy" method in the TCL interface. Ticket #3039. (CVS 4975)
FossilOrigin-Name: 6f07968ec4c9d773a852ecc8343df416d17af2a4
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 7210faed6..47402217a 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -12,7 +12,7 @@ ** A TCL Interface to SQLite. Append this file to sqlite3.c and ** compile the whole thing to build a TCL-enabled version of SQLite. ** -** $Id: tclsqlite.c,v 1.213 2008/04/04 12:21:09 drh Exp $ +** $Id: tclsqlite.c,v 1.214 2008/04/10 13:42:56 drh Exp $ */ #include "tcl.h" #include <errno.h> @@ -1299,7 +1299,6 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ char *zFile; /* The file from which to extract data */ char *zConflict; /* The conflict algorithm to use */ sqlite3_stmt *pStmt; /* A statement */ - int rc; /* Result code */ int nCol; /* Number of columns in the table */ int nByte; /* Number of bytes in an SQL string */ int i, j; /* Loop counters */ |