Index: third_party/sqlite/src/test/memleak.test |
diff --git a/third_party/sqlite/src/test/memleak.test b/third_party/sqlite/src/test/memleak.test |
index f4aaf27d28afd60da9e7b7ff7f922b7a7ed19be5..a24a901f50748e743dd202daf1ae8fd4118fc74c 100644 |
--- a/third_party/sqlite/src/test/memleak.test |
+++ b/third_party/sqlite/src/test/memleak.test |
@@ -75,12 +75,11 @@ foreach testfile $FILELIST { |
} |
if {$LeakList!=""} { |
puts -nonewline memory-leak-test-$tail... |
- incr ::nTest |
+ incr_ntest |
foreach x $LeakList { |
if {$x!=[lindex $LeakList 0]} { |
puts " failed! ($LeakList)" |
- incr ::nErr |
- lappend ::failList memory-leak-test-$tail |
+ fail_test memory-leak-test-$tail |
break |
} |
} |