From bb87d9718fc6820409980186acdd72934688117e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Tadeusz=20So=C5=9Bnierz?= Date: Thu, 15 Sep 2011 00:13:20 +0200 Subject: [PATCH] Tests for RT #66606 --- S04-statement-modifiers/for.t | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/S04-statement-modifiers/for.t b/S04-statement-modifiers/for.t index 6308de2566..4dc790671d 100644 --- a/S04-statement-modifiers/for.t +++ b/S04-statement-modifiers/for.t @@ -100,6 +100,14 @@ use Test; eval_dies_ok '1 for for ;', 'double statement-modifying for is not allowed'; +# RT #66606 +{ + my $x = 1 for ^3; + is $x, 1; + (my @a).push: $_ for ^3; + is @a.join(','), '0,1,2'; +} + done; # vim: ft=perl6