Adjust filename globbing in backcompat.test for Windows.

FossilOrigin-Name: b0f4796306a2cb11d6897d5c33f5da05c7473e07

diff --git a/manifest b/manifest
index a8862e88bdecf5f11df5a344c2128cac832a2805..f4176af25d91a51a53d8878d95507da5b0e175c0 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Fix\sbackcompat.test\sso\sthat\sit\sworks\swith\swindows\smandatory\slocking.
-D 2010-08-19T17:16:11
+C Adjust\sfilename\sglobbing\sin\sbackcompat.test\sfor\sWindows.
+D 2010-08-19T18:05:46
 F Makefile.arm-wince-mingw32ce-gcc d6df77f1f48d690bd73162294bbba7f59507c72f
 F Makefile.in 543f91f24cd7fee774ecc0a61c19704c0c3e78fd
 F Makefile.linux-gcc 91d710bdc4998cb015f39edf3cb314ec4f4d7e23
@@ -259,7 +259,7 @@ F test/autoindex1.test 7df441bf0e7a88644eb80993339dbf1db3a12c68
 F test/autovacuum.test bb7c0885e6f8f1d633045de48f2b66082162766d
 F test/autovacuum_ioerr2.test 598b0663074d3673a9c1bc9a16e80971313bafe6
 F test/avtrans.test 0252654f4295ddda3b2cce0e894812259e655a85
-F test/backcompat.test bf0f2468f9c9aba447a0625060b09d9663795074
+F test/backcompat.test 0627eeeabefdceae16fa2d5cf920d6cc926f4daa
 F test/backup.test 200e64bd91244b73ca8094bc1e03dfc83cc94c2e
 F test/backup2.test b7c69f937c912e85ac8a5dbd1e1cf290302b2d49
 F test/backup_ioerr.test 1f012e692f42c0442ae652443258f70e9f20fa38
@@ -845,7 +845,7 @@ F tool/speedtest2.tcl ee2149167303ba8e95af97873c575c3e0fab58ff
 F tool/speedtest8.c 2902c46588c40b55661e471d7a86e4dd71a18224
 F tool/speedtest8inst1.c 293327bc76823f473684d589a8160bde1f52c14e
 F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f
-P 7999910e85b1f24c5860425ba47e7ab10c22e887
-R 2312b59b9cab0b977ed7b7f3e201421e
-U dan
-Z e72bc2907346bae2124df9a31e8a0e8b
+P 8d05f66db7d6e8b8916fcf22fa92159d863d2610
+R d9f5b31d60c2c1063b071033be51256c
+U shaneh
+Z e8887c1df6874578f88d6a0c574bc962

diff --git a/manifest.uuid b/manifest.uuid
index c1a13022118b6d1347fe4f05145dee4643f8ee98..056872012bcbb0f47ca654e201d7f77c64182340 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-8d05f66db7d6e8b8916fcf22fa92159d863d2610
\ No newline at end of file
+b0f4796306a2cb11d6897d5c33f5da05c7473e07
\ No newline at end of file

diff --git a/test/backcompat.test b/test/backcompat.test
index 1aa5179add413a033abd1af58ed95fa56b16e0be..40f25cdbd5eacebf817371fb5a7431c20df551f0 100644 (file)
--- a/test/backcompat.test
+++ b/test/backcompat.test
@@ -35,6 +35,9 @@ db close
 #
 set binaries [list]
 set pattern "[file tail [info nameofexec]]*"
+if {$tcl_platform(platform)=="windows"} {
+  set pattern [string map {\.exe {}} $pattern]
+}
 foreach file [glob $pattern] {
   if {[file executable $file]} {lappend binaries $file}
 }
@@ -92,6 +95,7 @@ proc do_allbackcompat_test {script} {
     foreach dir {0 1} {
 
       set bintag [string map {testfixture {}} $bin]
+      set bintag [string map {\.exe {}} $bintag]
       if {$bintag == ""} {set bintag self}
       set ::bcname ".$bintag.$dir."
 
@@ -201,9 +205,6 @@ do_allbackcompat_test {
   } } {}
   set data [read_file_system]
 
-  set f "test.db-journal[incr x]"
-  file copy -force test.db-journal $f
-
   do_test backcompat-1.2.4 { sql1 { COMMIT } } {}
 
   set same [expr {[sql2 {SELECT md5sum(a), md5sum(b) FROM t1}] == $cksum2}]