Change tests to reflect "no unspace in regex" rule

Raku · Sep 28, 2013 · 0bf3998 · 0bf3998
1 parent 1bd3f09
commit 0bf3998
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/t/p5regex/01-p5regex.t b/t/p5regex/01-p5regex.t
@@ -78,7 +78,7 @@ for @files -> $fn {
             todo($m[0], 1);
         }
         else {
-            next if $l ~~ /^\s*\# | ^\s*$ /;
+            next if $l ~~ /^ \s* '#' | ^\s*$ /;
             test_line($l);
             $tests := $tests + 1;
         }

diff --git a/t/qregex/01-qregex.t b/t/qregex/01-qregex.t
@@ -85,7 +85,7 @@ for @files -> $fn {
             todo($m[0], 1);
         }
         else {
-            next if $l ~~ /^\s*\# | ^\s*$ /;
+            next if $l ~~ /^ \s* '#' | ^ \s* $ /;
             test_line($l);
             $tests := $tests + 1;
         }

diff --git a/t/qregex/rx_metachars b/t/qregex/rx_metachars
@@ -66,9 +66,9 @@ def\z			abc\ndef	<Unsupported>	retired metachars (\z)
 abc # def		abc#def		y	comments (#)
 abc # xyz		abc#def		y	comments (#)
 abc # def \n \$		abc#def		y	comments (#)
-abc \# def		abc#def		y	comments (#)
-abc \# xyz		abc#def		n	comments (#)
-^ abc \# def $		abc#def		y	comments (#)
+abc '#' def		abc#def		y	comments (#)
+abc '#' xyz		abc#def		n	comments (#)
+^ abc '#' def $		abc#def		y	comments (#)
 ^^ abc \n ^^ def	abc\ndef	y	line beginnings and endings (^^)
 # todo :pugs<feature>
 ^^ abc \n ^^ def \n ^^	abc\ndef\n	n	line beginnings and endings (^^)