database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00
Code Activity

Changes to test scripts so that the "inmemory_journal" permutation works with [ef126e775a].

Browse Source 
FossilOrigin-Name: f553c8ed04b4b2df8ff4929e0754e3ffd1d01ba4
This commit is contained in:
dan
2010-07-08 09:44:42 +00:00
parent 8700b1e52d
commit cb35460330
18 changed files with 149 additions and 118 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
test/tester.tcl
View File

@ -105,11 +105,9 @@ if {[info command sqlite_orig]==""} {
}
set res [uplevel 1 sqlite_orig $args]
if {[info exists ::G(perm:presql)]} {
[lindex $args 0] eval $::G(perm:presql)
}
set res
} else {
# This command is not opening a new database connection. Pass the
@ -120,6 +118,13 @@ if {[info command sqlite_orig]==""} {
}
}
proc execpresql {handle args} {
trace remove execution $handle enter [list execpresql $handle]
if {[info exists ::G(perm:presql)]} {
$handle eval $::G(perm:presql)
}
}
# This command should be called after loading tester.tcl from within
# all test scripts that are incompatible with encryption codecs.
#