diff options
author | dan <dan@noemail.net> | 2014-12-10 20:29:49 +0000 |
---|---|---|
committer | dan <dan@noemail.net> | 2014-12-10 20:29:49 +0000 |
commit | 6e45e0c8d7cb8cc14ea80896cad8b269bc990c95 (patch) | |
tree | b49ac600757310d4956281d825f3e06e5e72cc68 /src/tclsqlite.c | |
parent | 684ec98fe3f0a11aa825a8747a6724225ee30a24 (diff) | |
download | sqlite-6e45e0c8d7cb8cc14ea80896cad8b269bc990c95.tar.gz sqlite-6e45e0c8d7cb8cc14ea80896cad8b269bc990c95.zip |
Add new test file e_walhook.test.
FossilOrigin-Name: 2eb6d3e4fbe388ef28e4b7b846e9e8a4361517a4
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r-- | src/tclsqlite.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 4fb78a5d1..32de52730 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -635,6 +635,7 @@ static int DbWalHandler( Tcl_Interp *interp = pDb->interp; assert(pDb->pWalHook); + assert( db==pDb->db ); p = Tcl_DuplicateObj(pDb->pWalHook); Tcl_IncrRefCount(p); Tcl_ListObjAppendElement(interp, p, Tcl_NewStringObj(zDb, -1)); |