Fix the crash-followed-by-corruption bug revealed by savepoint4.test. This is actually the same bug as was fixed by (6043). The fix was not entirely correct. (CVS 6047)

FossilOrigin-Name: 688336266f0aa5630f4f550ae3787a64f39f9cfa
2008-12-20 08:39:57 +00:00
parent 3a5990ab44
commit ecfef98536
4 changed files with 24 additions and 21 deletions
@@ -9,7 +9,7 @@
 #
 #***********************************************************************
 #
-# $Id: savepoint4.test,v 1.2 2008/12/19 18:45:53 danielk1977 Exp $
+# $Id: savepoint4.test,v 1.3 2008/12/20 08:39:57 danielk1977 Exp $

 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
@@ -19,8 +19,7 @@ proc signature {} {
  return [db eval {SELECT count(*), md5sum(x) FROM t1}]
 }

-set ITERATIONS 3
-
+set ITERATIONS 25
 expr srand(0)

 do_test savepoint4-1 {