Add passing test for RT #78232

Raku · Nov 12, 2011 · 16bc94a · 16bc94a
1 parent fe4c35b
commit 16bc94a
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/S04-statements/for.t b/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