aboutsummaryrefslogtreecommitdiff
path: root/ext/intck/intck_common.tcl
diff options
context:
space:
mode:
authordan <Dan Kennedy>2024-02-20 20:18:02 +0000
committerdan <Dan Kennedy>2024-02-20 20:18:02 +0000
commiteb715f022f71d912e11b51ba7ab68f77d92e0234 (patch)
tree33d11ecd519028f86e66a6d4dab14802ce48ee14 /ext/intck/intck_common.tcl
parentcfcb3b9208236e6d40633bf574de2b7559ad4c9f (diff)
downloadsqlite-eb715f022f71d912e11b51ba7ab68f77d92e0234.tar.gz
sqlite-eb715f022f71d912e11b51ba7ab68f77d92e0234.zip
Have the intck extension better handle corruption at the b-tree layer.
FossilOrigin-Name: ecd775d108f77d39a1303316c1e0f0b0ae3ffc5218222e1ebfe2ef6783829b85
Diffstat (limited to 'ext/intck/intck_common.tcl')
-rw-r--r--ext/intck/intck_common.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/intck/intck_common.tcl b/ext/intck/intck_common.tcl
index 757ca82b3..f00a465b3 100644
--- a/ext/intck/intck_common.tcl
+++ b/ext/intck/intck_common.tcl
@@ -16,7 +16,7 @@ if {![info exists testdir]} {
source $testdir/tester.tcl
proc do_intck {db {bSuspend 0}} {
- set ic [sqlite3_intck $db main ""]
+ set ic [sqlite3_intck $db main]
set ret [list]
while {"SQLITE_OK"==[$ic step]} {
@@ -37,7 +37,7 @@ proc do_intck {db {bSuspend 0}} {
}
proc intck_sql {db tbl} {
- set ic [sqlite3_intck $db main ""]
+ set ic [sqlite3_intck $db main]
set sql [$ic test_sql $tbl]
$ic close
return $sql