Further tweaks related to deleting files from malloc_common.tcl.

FossilOrigin-Name: 3e649f80e2a1b2e098f6ca32994ba40157271e69

manifest

@@ -1,5 +1,5 @@
-C Fix\sa\sproblem\swith\sthe\sprevious\schange\sto\smalloc_common.tcl.
-D 2010-09-16T15:58:12
+C Further\stweaks\srelated\sto\sdeleting\sfiles\sfrom\smalloc_common.tcl.
+D 2010-09-16T16:16:07
 F Makefile.arm-wince-mingw32ce-gcc d6df77f1f48d690bd73162294bbba7f59507c72f
 F Makefile.in c599a15d268b1db2aeadea19df2adc3bf2eb6bee
 F Makefile.linux-gcc 91d710bdc4998cb015f39edf3cb314ec4f4d7e23
@@ -633,7 +633,7 @@ F test/tclsqlite.test 8c154101e704170c2be10f137a5499ac2c6da8d3
 F test/tempdb.test 800c36623d67a2ad1f58784b9c5644e0405af6e6
 F test/temptable.test f42121a0d29a62f00f93274464164177ab1cc24a
 F test/temptrigger.test b0273db072ce5f37cf19140ceb1f0d524bbe9f05
-F test/tester.tcl 87ddf74a6eb417191f095861c0b02f6feafcebd8
+F test/tester.tcl dd05c5302a149632ec692c6175f02ef2e4be13fd
 F test/thread001.test a3e6a7254d1cb057836cb3145b60c10bf5b7e60f
 F test/thread002.test afd20095e6e845b405df4f2c920cb93301ca69db
 F test/thread003.test b824d4f52b870ae39fc5bae4d8070eca73085dca
@@ -857,7 +857,7 @@ F tool/speedtest2.tcl ee2149167303ba8e95af97873c575c3e0fab58ff
 F tool/speedtest8.c 2902c46588c40b55661e471d7a86e4dd71a18224
 F tool/speedtest8inst1.c 293327bc76823f473684d589a8160bde1f52c14e
 F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f
-P ebfb04f00c839601d92d33b9c2305fc4ce869bbc
-R e0455f0f518f5d2f0f6b90ba3530b59d
+P e07a33ea0fd50d56f2d00965c754e652c48f32fb
+R 4597070adb412a9d1599a6d66968aaba
 U dan
-Z 654d273311d3d19636135ef1ea6d7831
+Z a4c88f0ce920360a36140ed000ccaa9e

manifest.uuid

@@ -1 +1 @@
-e07a33ea0fd50d56f2d00965c754e652c48f32fb
+3e649f80e2a1b2e098f6ca32994ba40157271e69

test/tester.tcl

@@ -613,7 +613,7 @@ proc forcedelete {filename} {
   set nDelay 100                  ;# Delay in ms before retrying.
   for {set i 0} {$i<$nRetry} {incr i} {
     set rc [catch {file delete -force $filename} msg]
-    if {$rc==0} continue
+    if {$rc==0} break
     after $nDelay
   }
   if {$rc} { error $msg }