Permalink
Browse files

Add passing test for RT #78232

  • Loading branch information...
1 parent fe4c35b commit 16bc94ad9ad08128bd328a023440f7b1068510e1 @tadzik tadzik committed Nov 12, 2011
Showing with 7 additions and 0 deletions.
  1. +7 −0 S04-statements/for.t
@@ -503,6 +503,13 @@ lives_ok {
for 1 .. 5 -> $x, $y? { }
}, 'Iteration variables do not need to add up if one is optional';
+# RT #78232
+{
+ my $a = 0;
+ for 1, 2, 3 { sub foo {}; $a++ }
+ is $a, 3, 'RT #78232';
+}
+
done;
# vim: ft=perl6

0 comments on commit 16bc94a

Please sign in to comment.