Index: third_party/sqlite/src/test/soak.test |
diff --git a/third_party/sqlite/src/test/soak.test b/third_party/sqlite/src/test/soak.test |
index 6bfd40a1db6dc35f32e9c2288ccf5617e1b4f360..c457dec4a957a44b6daafc43c4944554449b2ea6 100644 |
--- a/third_party/sqlite/src/test/soak.test |
+++ b/third_party/sqlite/src/test/soak.test |
@@ -65,14 +65,14 @@ set SOAKTESTS { |
corruptC.test |
} |
-set ISQUICK 1 |
+set G(isquick) 1 |
set soak_starttime [clock seconds] |
set soak_finishtime [expr {$soak_starttime + $TIMEOUT}] |
# Loop until the timeout is reached or an error occurs. |
# |
-for {set iRun 0} {[clock seconds] < $soak_finishtime && $nErr==0} {incr iRun} { |
+for {set iRun 0} {[clock seconds] < $soak_finishtime} {incr iRun} { |
set iIdx [expr {$iRun % [llength $SOAKTESTS]}] |
source [file join $testdir [lindex $SOAKTESTS $iIdx]] |
@@ -80,11 +80,11 @@ for {set iRun 0} {[clock seconds] < $soak_finishtime && $nErr==0} {incr iRun} { |
if {$sqlite_open_file_count>0} { |
puts "$tail did not close all files: $sqlite_open_file_count" |
- incr nErr |
- lappend ::failList $tail |
+ fail_test $tail |
set sqlite_open_file_count 0 |
} |
+ if {[set_test_counter errors]>0} break |
} |
really_finish_test |