< bartolin_> r: my $str; my $i = 0; while $i < 2 { LEAVE { last }; $i++; $str
~= ~$i; }; say $str; $str = ""; $i = 0; while $i < 2 { LEAVE { $str ~=
"leaving" }; $i++; $str ~= ~$i; }; say $str
<+camelia> rakudo-moar a38b59: OUTPUT«11leaving2leaving»
<+camelia> ..rakudo-jvm a38b59: OUTPUT«1
On Mon Aug 03 13:00:39 2015, coke wrote:
> On Sun Nov 23 00:48:59 2014, barto...@gmx.de wrote:
> > Well, the error for rakudo.parrot is gone:
> >
> > $ perl6-p -e 'my $i=0; while $i < 3 { LEAVE { last }; say $i++; }'
> > 0
> >
> > But there is still something wrong with the LEAVE phaser in a while
On Sun Nov 23 00:48:59 2014, barto...@gmx.de wrote:
> Well, the error for rakudo.parrot is gone:
>
> $ perl6-p -e 'my $i=0; while $i < 3 { LEAVE { last }; say $i++; }'
> 0
>
> But there is still something wrong with the LEAVE phaser in a while
> statement. First, the above command has a different
Well, the error for rakudo.parrot is gone:
$ perl6-p -e 'my $i=0; while $i < 3 { LEAVE { last }; say $i++; }'
0
But there is still something wrong with the LEAVE phaser in a while statement.
First, the above command has a different output on rakudo.moar and rakudo.jvm:
$ perl6-m -e 'my $i=0; wh
