Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[t/spec] test for RT #76792, ** and \w interact badly in regexes

git-svn-id: http://svn.pugscode.org/pugs@31889 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit 4d80dbcebbca3499cd70a350f2ef6e38bd13e883 1 parent 889573d
moritz authored
Showing with 4 additions and 1 deletion.
  1. +4 −1 S05-metasyntax/repeat.t
View
5 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
Please sign in to comment.
Something went wrong with that request. Please try again.