This is an automatically generated mail to inform you that tests are now
available in t/spec/S05-metasyntax/repeat.t
commit c3a2cd0aced0bcb0960d03aeca8152e316011bfc
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Mon Aug 2 19:32:21 2010 +0000
[t/spec] test for RT #76792, ** and \w interact badly in regexes
git-svn-id: http://svn.pugscode.org/p...@31889
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S05-metasyntax/repeat.t b/t/spec/S05-metasyntax/repeat.t
index a467b93..6f57666 100644
--- a/t/spec/S05-metasyntax/repeat.t
+++ b/t/spec/S05-metasyntax/repeat.t
@@ -14,7 +14,7 @@ be valid perl6.
# Note: single-quotes.t tests repetition on single quoted items in regexes.
-plan 21;
+plan 22;
# L<S05/Bracket rationalization/The general repetition specifier is now>
@@ -57,4 +57,7 @@ ok 'a, b, c' !~~ /:s^<alpha>**\,$/, 'with no spaces around
**, no spaces can be
ok 'a, b, c' ~~ /:s^ <alpha> ** \, $/, 'with spaces around **, spaces can be
matched';
ok 'a , b ,c' ~~ /:s^ <alpha> ** \, $/, 'same, but with leading spaces';
+# RT #76792
+ok ('a b,c,d' ~~ token { \w \s \w ** \, }), 'can combine ** with backslash
character classes';
+
# vim: ft=perl6
