[perl #121147] The last bug

[jn...@jnthn.net via RT]

On Sun Feb 02 11:20:48 2014, m...@kli.org wrote:
> <clsn> perl6: my $i=0; while $i < 6 { FIRST { say "Here"; last }; say
> $i++ }
> <camelia> rakudo-moar 535d91: OUTPUT«0␤1␤2␤3␤4␤5␤»
> <camelia> ..niecza v24-109-g48a8de3:
> OUTPUT«===SORRY!===␤␤Action method
> statement_prefix:FIRST not
> yet implemented at /tmp/tmpfile line 1:␤------> hile $i < 6 {
> FIRST { say
> "Here"; last }⏏; say $i++ }␤␤Unhandled exception: Unable
> to
> resolve metho…»
> <camelia> ..rakudo-parrot 535d91, rakudo-jvm 535d91:
> OUTPUT«Here␤0␤1␤2␤3␤4␤5␤»
> <masak> clsn: it's another one of those "how does X interact with Y"
> things.
> phasers are full of them.
> <clsn> Wow, didn't expect moar to do different there.
> <Timbus> i guess you could always use the first part of a loop(;;) ;/
> <clsn> I'm not positive that the behavior is wrong or right there...
> <-- rindolf has quit (Quit: Leaving)
> <masak> clsn: looks like rakudo-parrot has it right.
> <masak> hm, wait.
> <clsn> Does the "last" not count there then?
> <masak> no, none of them are right.
> <masak> yes, it should, of course.
> <masak> clsn: feel free to submit a separate rakudobug for that one.
> ;)
> <clsn> Heh. :)
> <Timbus> call it 'the last bug' and we can declare perl 6 finished
> when it's
> closed

Fixed now. Sadly there do remain 20 more things in the xmas bug list, 
but...close to last. ;-) Tests in S04-phasers/first.t.