diff options
author | drh <drh@noemail.net> | 2013-08-02 20:44:48 +0000 |
---|---|---|
committer | drh <drh@noemail.net> | 2013-08-02 20:44:48 +0000 |
commit | 7fb30bd0dd4057c203415b7d1d0fe0a15e25a8f7 (patch) | |
tree | dd7ab4cd95b8b32df8e8f92df1ed4234744c2da1 /src/test_autoext.c | |
parent | 6f855952d07e32967b84c790201da4b45d849722 (diff) | |
parent | e0c7efd9ae6706b5e39093bcf2256569032c2b91 (diff) | |
download | sqlite-7fb30bd0dd4057c203415b7d1d0fe0a15e25a8f7.tar.gz sqlite-7fb30bd0dd4057c203415b7d1d0fe0a15e25a8f7.zip |
Merge in the latest trunk changes, including partial indexes, the MAX_PATH
fix in os_win.c, and the sqlite3_cancel_auto_extension() API.
FossilOrigin-Name: 7e1acb390770d1bd189fac7a3a7f96106f96e3a4
Diffstat (limited to 'src/test_autoext.c')
-rw-r--r-- | src/test_autoext.c | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/src/test_autoext.c b/src/test_autoext.c index b5013f317..4a5a5caa0 100644 --- a/src/test_autoext.c +++ b/src/test_autoext.c @@ -99,6 +99,22 @@ static int autoExtSqrObjCmd( } /* +** tclcmd: sqlite3_cancel_auto_extension_sqr +** +** Unregister the "sqr" extension. +*/ +static int cancelAutoExtSqrObjCmd( + void * clientData, + Tcl_Interp *interp, + int objc, + Tcl_Obj *CONST objv[] +){ + int rc = sqlite3_cancel_auto_extension((void*)sqr_init); + Tcl_SetObjResult(interp, Tcl_NewIntObj(rc)); + return SQLITE_OK; +} + +/* ** tclcmd: sqlite3_auto_extension_cube ** ** Register the "cube" extension to be loaded automatically. @@ -115,6 +131,22 @@ static int autoExtCubeObjCmd( } /* +** tclcmd: sqlite3_cancel_auto_extension_cube +** +** Unregister the "cube" extension. +*/ +static int cancelAutoExtCubeObjCmd( + void * clientData, + Tcl_Interp *interp, + int objc, + Tcl_Obj *CONST objv[] +){ + int rc = sqlite3_cancel_auto_extension((void*)cube_init); + Tcl_SetObjResult(interp, Tcl_NewIntObj(rc)); + return SQLITE_OK; +} + +/* ** tclcmd: sqlite3_auto_extension_broken ** ** Register the broken extension to be loaded automatically. @@ -130,6 +162,22 @@ static int autoExtBrokenObjCmd( return SQLITE_OK; } +/* +** tclcmd: sqlite3_cancel_auto_extension_broken +** +** Unregister the broken extension. +*/ +static int cancelAutoExtBrokenObjCmd( + void * clientData, + Tcl_Interp *interp, + int objc, + Tcl_Obj *CONST objv[] +){ + int rc = sqlite3_cancel_auto_extension((void*)broken_init); + Tcl_SetObjResult(interp, Tcl_NewIntObj(rc)); + return SQLITE_OK; +} + #endif /* SQLITE_OMIT_LOAD_EXTENSION */ @@ -161,6 +209,12 @@ int Sqlitetest_autoext_Init(Tcl_Interp *interp){ Tcl_CreateObjCommand(interp, "sqlite3_auto_extension_broken", autoExtBrokenObjCmd, 0, 0); #endif + Tcl_CreateObjCommand(interp, "sqlite3_cancel_auto_extension_sqr", + cancelAutoExtSqrObjCmd, 0, 0); + Tcl_CreateObjCommand(interp, "sqlite3_cancel_auto_extension_cube", + cancelAutoExtCubeObjCmd, 0, 0); + Tcl_CreateObjCommand(interp, "sqlite3_cancel_auto_extension_broken", + cancelAutoExtBrokenObjCmd, 0, 0); Tcl_CreateObjCommand(interp, "sqlite3_reset_auto_extension", resetAutoExtObjCmd, 0, 0); return TCL_OK; |