diff options
author | drh <drh@noemail.net> | 2003-03-30 19:17:01 +0000 |
---|---|---|
committer | drh <drh@noemail.net> | 2003-03-30 19:17:01 +0000 |
commit | 3aa31a16e6d692bc9963837c6196d70591586c6e (patch) | |
tree | 8f0bad7aa06bbc34bd64cd14af151d6882161c89 /src/tclsqlite.c | |
parent | 9077ba8ee516d84610cd63c00c41692fd1362093 (diff) | |
download | sqlite-3aa31a16e6d692bc9963837c6196d70591586c6e.tar.gz sqlite-3aa31a16e6d692bc9963837c6196d70591586c6e.zip |
Remove the experimental sqlite_open_aux_file() API. It will soon be replaced
by ATTACH and DETACH SQL commands. (CVS 889)
FossilOrigin-Name: b6d6e07f3a5cb493f2cf0675bc6061c5afe5c078
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r-- | src/tclsqlite.c | 38 |
1 files changed, 4 insertions, 34 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index bddcbb267..69f70bd41 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.44 2003/01/31 17:21:50 drh Exp $ +** $Id: tclsqlite.c,v 1.45 2003/03/30 19:17:03 drh Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -330,14 +330,13 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ static const char *DB_strs[] = { "busy", "changes", "close", "complete", "errorcode", "eval", - "function", "last_insert_rowid", "open_aux_file", - "timeout", 0 + "function", "last_insert_rowid", "timeout", + 0 }; enum DB_enum { DB_BUSY, DB_CHANGES, DB_CLOSE, DB_COMPLETE, DB_ERRORCODE, DB_EVAL, - DB_FUNCTION, DB_LAST_INSERT_ROWID,DB_OPEN_AUX_FILE, - DB_TIMEOUT, + DB_FUNCTION, DB_LAST_INSERT_ROWID,DB_TIMEOUT, }; if( objc<2 ){ @@ -570,35 +569,6 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ } /* - ** $db open_aux_file FILENAME - ** - ** Begin using FILENAME as the database file used to store temporary - ** tables. - */ - case DB_OPEN_AUX_FILE: { - const char *zFilename; - char *zErrMsg = 0; - int rc; - if( objc!=3 ){ - Tcl_WrongNumArgs(interp, 2, objv, "FILENAME"); - return TCL_ERROR; - } - zFilename = Tcl_GetStringFromObj(objv[2], 0); - rc = sqlite_open_aux_file(pDb->db, zFilename, &zErrMsg); - pDb->rc = rc; - if( rc!=0 ){ - if( zErrMsg ){ - Tcl_AppendResult(interp, zErrMsg, 0); - free(zErrMsg); - }else{ - Tcl_AppendResult(interp, sqlite_error_string(rc), 0); - } - return TCL_ERROR; - } - break; - } - - /* ** $db timeout MILLESECONDS ** ** Delay for the number of milliseconds specified when a file is locked. |