diff options
| author | drh <drh@noemail.net> | 2016-02-15 17:39:10 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2016-02-15 17:39:10 +0000 |
| commit | 7f219fad58bb84f5e856134a7b6909c8c0482c9b (patch) | |
| tree | c22fdd868e707d1a9bdd0e038f6b5224eff0bc15 /src/tclsqlite.c | |
| parent | a66e386225cc63ef5becf5b9299ddeb17299e1c3 (diff) | |
| parent | 195c8d5eba26853b65f86ea6c9947f24fea70389 (diff) | |
| download | sqlite-7f219fad58bb84f5e856134a7b6909c8c0482c9b.tar.gz sqlite-7f219fad58bb84f5e856134a7b6909c8c0482c9b.zip | |
Merge 3.11.0 changes.
FossilOrigin-Name: 631023dd9aa19cd8d92d712941d58e7148821995
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 9da77e268..e555cd6de 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -3297,9 +3297,13 @@ EXTERN int Sqlite3_Unload(Tcl_Interp *interp, int flags){ return TCL_OK; } EXTERN int Tclsqlite3_Unload(Tcl_Interp *interp, int flags){ return TCL_OK; } /* Because it accesses the file-system and uses persistent state, SQLite -** is not considered appropriate for safe interpreters. Hence, we deliberately -** omit the _SafeInit() interfaces. +** is not considered appropriate for safe interpreters. Hence, we cause +** the _SafeInit() interfaces return TCL_ERROR. */ +EXTERN int Sqlite3_SafeInit(Tcl_Interp *interp){ return TCL_ERROR; } +EXTERN int Sqlite3_SafeUnload(Tcl_Interp *interp, int flags){return TCL_ERROR;} + + #ifndef SQLITE_3_SUFFIX_ONLY int Sqlite_Init(Tcl_Interp *interp){ return Sqlite3_Init(interp); } |