Permalink
Browse files

[t/spec] Test for RT #65212

git-svn-id: http://svn.pugscode.org/pugs@28004 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent fe2a54c commit 4856f9e782519bce9dd843e3c1b5cc2fbb1b43b4 kyle committed Aug 16, 2009
Showing with 8 additions and 2 deletions.
  1. +8 −2 S04-statements/for.t
View
@@ -11,7 +11,7 @@ for statement as possible
=end description
-plan 56;
+plan 57;
## No foreach
# L<S04/The C<for> statement/"no foreach statement any more">
@@ -440,6 +440,12 @@ eval_dies_ok('for(0..5) { }','keyword needs at least one whitespace after it');
is $c, 6, 'infinte for loop ends in time using last';
}
-
+# RT #65212
+{
+ my $parsed = 0;
+ eval '$parsed = 1; for (1..3)->$n { last }';
+ #?rakudo todo 'RT #65212'
+ ok ! $parsed, 'for (1..3)->$n fails to parse';
+}
# vim: ft=perl6

0 comments on commit 4856f9e

Please sign in to comment.