1 files changed, 33 insertions, 11 deletions
diff --git a/third_party/sqlite/test/quick.test b/third_party/sqlite/test/quick.test
index b2b731e..70b0eeb 100644
--- a/third_party/sqlite/test/quick.test
+++ b/third_party/sqlite/test/quick.test
@@ -6,7 +6,7 @@
 #***********************************************************************
 # This file runs all tests.
 #
-# $Id: quick.test,v 1.84 2008/06/26 08:29:35 danielk1977 Exp $
+# $Id: quick.test,v 1.95 2009/03/16 14:48:19 danielk1977 Exp $
 
 proc lshift {lvar} {
   upvar $lvar l
@@ -35,7 +35,10 @@ while {[set arg [lshift argv]] != ""} {
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 rename finish_test really_finish_test
-proc finish_test {} {}
+proc finish_test {} {
+  catch {db close}
+  show_memstats
+}
 set ISQUICK 1
 
 set EXCLUDE {
@@ -43,7 +46,9 @@ set EXCLUDE {
   async.test
   async2.test
   async3.test
+  backup_ioerr.test
   corrupt.test
+  corruptC.test
   crash.test
   crash2.test
   crash3.test
@@ -57,6 +62,7 @@ set EXCLUDE {
   fts1.test
   fts2.test
   fuzz.test
+  fuzz3.test
   fuzz_malloc.test
   in2.test
   loadext.test
@@ -64,9 +70,12 @@ set EXCLUDE {
   misc7.test
   misuse.test
   mutex2.test
+  notify2.test
   onefile.test
   permutations.test
   quick.test
+  savepoint4.test
+  savepoint6.test
   select9.test
   soak.test
   speed1.test
@@ -79,6 +88,10 @@ set EXCLUDE {
   tkt2686.test
   thread001.test
   thread002.test
+  thread003.test
+  thread004.test
+  thread005.test
+  trans2.test
   vacuum3.test
 
   incrvacuum_ioerr.test
@@ -102,17 +115,26 @@ if {[sqlite3 -has-codec]} {
 set INCLUDE {
 }
 
-foreach testfile [lsort -dictionary [glob $testdir/*.test]] {
-  # If this is "veryquick.test", do not run any of the malloc or 
-  # IO error simulations.
-  if {[info exists ISVERYQUICK] && (
-    [string match *malloc* $testfile] || [string match *ioerr* $testfile]
-  ) } {
-    continue
-  }
+# If the QUICKTEST_INCLUDE environment variable is set, then interpret
+# it as a list of test files. Always run these files, even if they
+# begin with "malloc*" or "ioerr*" or are part of the EXCLUDE list
+# defined above.
+#
+set QUICKTEST_INCLUDE {}
+catch { set QUICKTEST_INCLUDE $env(QUICKTEST_INCLUDE) }
 
+foreach testfile [lsort -dictionary [glob $testdir/*.test]] {
   set tail [file tail $testfile]
-  if {[lsearch -exact $EXCLUDE $tail]>=0} continue
+  if { [lsearch $QUICKTEST_INCLUDE $tail]<0 } {
+    # If this is "veryquick.test", do not run any of the malloc or 
+    # IO error simulations.
+    if {[info exists ISVERYQUICK] && (
+      [string match *malloc* $testfile] || [string match *ioerr* $testfile]
+    ) } {
+      continue
+    }
+    if {[lsearch -exact $EXCLUDE $tail]>=0} continue
+  }
   if {[llength $INCLUDE]>0 && [lsearch -exact $INCLUDE $tail]<0} continue
   if {[info exists STARTAT] && [string match $STARTAT $tail]} {unset STARTAT}
   if {[info exists STARTAT]} continue