Index: test/permutations.test
==================================================================
--- test/permutations.test
+++ test/permutations.test
@@ -476,11 +476,11 @@
 
   # Exclude stmt.test, which expects sub-journals to use temporary files.
   stmt.test
 
   # WAL mode is different.
-  walmode.test
+  walmode.test walfault.test wal.test wal2.test wal3.test
 }
 
 ifcapable mem3 {
   run_tests "memsys3" -description {
     Run tests using the allocator in mem3.c.

Index: test/tester.tcl
==================================================================
--- test/tester.tcl
+++ test/tester.tcl
@@ -100,15 +100,17 @@
       }
       if {[sqlite_orig -has-codec]} {
         lappend args -key {xyzzy}
       }
 
-      uplevel 1 sqlite_orig $args
+      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 
       # arguments through to the C implemenation as the are.
       #
       uplevel 1 sqlite_orig $args