Add test (fudged 'todo') for RT #122951

Raku · Nov 11, 2015 · 38931b2 · 38931b2
1 parent ddc7e62
commit 38931b2
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S05-metasyntax/longest-alternative.t b/S05-metasyntax/longest-alternative.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 54;
+plan 55;
 
 #L<S05/Unchanged syntactic features/"While the syntax of | does not change">
 
@@ -459,4 +459,8 @@ my $str = 'a' x 7;
 # RT #126573
 ok "\r\n" ~~ /[";"|"\r\n"]/, '\r\n grapheme in an alternation matches correctly';
 
+# RT #122951
+#?rakudo todo 'negative lookahead does not LTM properly, RT #122951'
+is "abcde" ~~ / ab <![e]> cde | ab.. /, "abcde", 'negative lookahead does LTM properly';
+
 # vim: ft=perl6 et