Adapt the special case of '$' in item names for test 'vtabH-3.1' as well.

FossilOrigin-Name: e4aeaa2bc73b57f1ef134cc4f54e2a652a20b5c9

diff --git a/manifest b/manifest
index 2992ea4ce20950cbc60d2da2ac7881e3dc8745fe..ec927214e4853104797a4aba31db4494e7ce48ff 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Make\sthe\stest\s'vtabH-3.1'\swork\swhen\sthere\sare\sless\sthan\s5\stop-level\sitems.
-D 2016-08-26T01:47:22.955
+C Adapt\sthe\sspecial\scase\sof\s'$'\sin\sitem\snames\sfor\stest\s'vtabH-3.1'\sas\swell.
+D 2016-08-26T02:10:50.317
 F Makefile.in cfd8fb987cd7a6af046daa87daa146d5aad0e088
 F Makefile.linux-gcc 7bc79876b875010e8c8f9502eb935ca92aa3c434
 F Makefile.msc 5017381e4853b1472e01d5bb926be1268eba429c
@@ -1347,7 +1347,7 @@ F test/vtabC.test 4528f459a13136f982e75614d120aef165f17292
 F test/vtabD.test 05b3f1d77117271671089e48719524b676842e96
 F test/vtabE.test d5024aa42754962f6bb0afd261681686488e7afe
 F test/vtabF.test 1918844c7c902f6a16c8dacf1ec8f84886d6e78b
-F test/vtabH.test e2d597b61f06e74b7ec0e6366f10eab6a6404cd8
+F test/vtabH.test 97f61b0253260831af6232163f7852e2653baed6
 F test/vtabI.test 751b07636700dbdea328e4265b6077ccd6811a3f
 F test/vtab_alter.test 9e374885248f69e251bdaacf480b04a197f125e5
 F test/vtab_err.test 0d4d8eb4def1d053ac7c5050df3024fd47a3fbd8
@@ -1511,7 +1511,7 @@ F vsixtest/vsixtest.tcl 6a9a6ab600c25a91a7acc6293828957a386a8a93
 F vsixtest/vsixtest.vcxproj.data 2ed517e100c66dc455b492e1a33350c1b20fbcdc
 F vsixtest/vsixtest.vcxproj.filters 37e51ffedcdb064aad6ff33b6148725226cd608e
 F vsixtest/vsixtest_TemporaryKey.pfx e5b1b036facdb453873e7084e1cae9102ccc67a0
-P 3680f95ff34fdcf6a18a99268678a56e4be5a023
-R 43a3970ddbdab96e60099ba72556b24c
+P 328f79bb5713abbecaeb0ef3fb37f56a0946b915
+R dade750024fe6ad04559f56926a096ca
 U mistachkin
-Z 62b5f3e99eda63df5de3a56bf43d82d6
+Z 8b0930f7f9116d652fcf85daf416c55f

diff --git a/manifest.uuid b/manifest.uuid
index a4ff000932f40a04125892eda6e3de078bfdb79c..89b707eee1c961f18d6733415e5eb76e88242f20 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-328f79bb5713abbecaeb0ef3fb37f56a0946b915
\ No newline at end of file
+e4aeaa2bc73b57f1ef134cc4f54e2a652a20b5c9
\ No newline at end of file

diff --git a/test/vtabH.test b/test/vtabH.test
index d3f298e210e581a4857f44515bb8a41bd6a94ba9..f2a116f350fbe581807481cbf8799b8b97b15130 100644 (file)
--- a/test/vtabH.test
+++ b/test/vtabH.test
@@ -157,7 +157,7 @@ if {$tcl_platform(platform)!="windows" || \
   set lim_root_files [expr {$num_root_files > 5 ? 5 : $num_root_files}]
   foreach p [lrange $root_files 0 [expr {$lim_root_files - 1}]] {
     if {$::tcl_platform(platform) eq "windows"} {
-      if {![regexp {\$} $p]} {lappend res $p}
+      if {[regexp {\$} $p]} {incr lim_root_files -1} else {lappend res $p}
     } else {
       lappend res "/$p"
     }