aboutsummaryrefslogtreecommitdiff
path: root/src/tclsqlite.c
diff options
context:
space:
mode:
authordan <dan@noemail.net>2014-12-10 20:29:49 +0000
committerdan <dan@noemail.net>2014-12-10 20:29:49 +0000
commit6e45e0c8d7cb8cc14ea80896cad8b269bc990c95 (patch)
treeb49ac600757310d4956281d825f3e06e5e72cc68 /src/tclsqlite.c
parent684ec98fe3f0a11aa825a8747a6724225ee30a24 (diff)
downloadsqlite-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.c1
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));