WineHQ: winetest: allow numeric subtest names

[Ferenc Wagner]

Hi Jer,

Please check that winetest.builds will still match
everything with its patterns anchored.

ChangeLog:
  * Anchor build string match on both ends.
  * Allow numbers is subtest names.

Feri.

Index: winetest/dissect
===================================================================
RCS file: /home/wine/tools/winetest/dissect,v
retrieving revision 1.14
diff -u -r1.14 dissect
--- winetest/dissect	14 Jul 2004 20:37:20 -0000	1.14
+++ winetest/dissect	2 Sep 2004 11:34:08 -0000
@@ -72,7 +72,7 @@
 while (<BUILDS>) {
     next if /^#/;
     chomp;
-    last if $testbuild =~ $_;
+    last if $testbuild =~ "^$_\$";
 }
 close BUILDS;
 defined $_ or mydie "$1 not in $builds\n";
@@ -133,7 +133,7 @@
 while (<IN>) {
     if (!defined $unit) {       # new test
         next if /^\s*$/;
-        m[([_.a-z0-9]+):([_a-z]+) start ([/_.a-z0-9]+) (-|[.0-9]+)\r?$]
+        m[([_.a-z0-9]+):([_a-z0-9]+) start ([/_.a-z0-9]+) (-|[.0-9]+)\r?$]
           or mydie "no start line:$.: $_";
         ($unit,$test,$source,$rev) = ($1,$2,$3,$4);
         open OUT, ">:raw", $tmpfile or mydie "can't open $tmpfile: $!\n";