aboutsummaryrefslogtreecommitdiff
path: root/src/tclsqlite.c
diff options
context:
space:
mode:
authordrh <drh@noemail.net>2015-05-14 15:17:20 +0000
committerdrh <drh@noemail.net>2015-05-14 15:17:20 +0000
commit5f9a57fc49873318e74ed68a642b199a5da7d6cf (patch)
tree8cc0764f6873a9a037623d478ed8bd83e82dab74 /src/tclsqlite.c
parent060c3ffc71dd9fa09e02e0aca2c47d981affd57c (diff)
parentb27dd7c091d2b5eab95dfd03b17b9e0dd60ea45c (diff)
downloadsqlite-5f9a57fc49873318e74ed68a642b199a5da7d6cf.tar.gz
sqlite-5f9a57fc49873318e74ed68a642b199a5da7d6cf.zip
Merge in the IS-operator enhancements and other recent changes from trunk.
FossilOrigin-Name: 4f9229445c293b39c80b2a662901f608c85b36ef
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r--src/tclsqlite.c47
1 files changed, 0 insertions, 47 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c
index 5649b39f4..c139a2882 100644
--- a/src/tclsqlite.c
+++ b/src/tclsqlite.c
@@ -3852,43 +3852,6 @@ static int db_last_stmt_ptr(
}
#endif /* SQLITE_TEST */
-#if defined(SQLITE_TEST) || defined(SQLITE_ENABLE_DBSTAT_VTAB)
-/*
-** tclcmd: register_dbstat_vtab DB
-**
-** Cause the dbstat virtual table to be available on the connection DB
-*/
-static int sqlite3RegisterDbstatCmd(
- void *clientData,
- Tcl_Interp *interp,
- int objc,
- Tcl_Obj *CONST objv[]
-){
-#ifdef SQLITE_OMIT_VIRTUALTABLE
- Tcl_AppendResult(interp, "dbstat not available because of "
- "SQLITE_OMIT_VIRTUALTABLE", (void*)0);
- return TCL_ERROR;
-#else
- struct SqliteDb { sqlite3 *db; };
- char *zDb;
- Tcl_CmdInfo cmdInfo;
-
- if( objc!=2 ){
- Tcl_WrongNumArgs(interp, 1, objv, "DB");
- return TCL_ERROR;
- }
-
- zDb = Tcl_GetString(objv[1]);
- if( Tcl_GetCommandInfo(interp, zDb, &cmdInfo) ){
- int sqlite3_dbstat_register(sqlite3*);
- sqlite3* db = ((struct SqliteDb*)cmdInfo.objClientData)->db;
- sqlite3_dbstat_register(db);
- }
- return TCL_OK;
-#endif /* SQLITE_OMIT_VIRTUALTABLE */
-}
-#endif /* defined(SQLITE_TEST) || defined(SQLITE_ENABLE_DBSTAT_VTAB) */
-
/*
** Configure the interpreter passed as the first argument to have access
** to the commands and linked variables that make up:
@@ -3907,16 +3870,6 @@ static void init_all(Tcl_Interp *interp){
Md5_Init(interp);
#endif
- /* Install the [register_dbstat_vtab] command to access the implementation
- ** of virtual table dbstat (source file test_stat.c). This command is
- ** required for testfixture and sqlite3_analyzer, but not by the production
- ** Tcl extension. */
-#if defined(SQLITE_TEST) || defined(SQLITE_ENABLE_DBSTAT_VTAB)
- Tcl_CreateObjCommand(
- interp, "register_dbstat_vtab", sqlite3RegisterDbstatCmd, 0, 0
- );
-#endif
-
#ifdef SQLITE_TEST
{
extern int Sqliteconfig_Init(Tcl_Interp*);