From @masak

<masak> r​: loop { last; LEAVE say "bye!" }; say "outside"
<p6eval> rakudo 16db64​: OUTPUT«outside␤»
<masak> do we have this one on file?
<masak> closest I find is https://rt-archive.perl.org/perl6/Ticket/Display.html?id=113548
* masak submits rakudobug
<masak> r​: for ^10 { next; LEAVE say "yay!" }; say "outside"
<p6eval> rakudo 16db64​: OUTPUT«outside␤»
<masak> that, too.
<masak> n​: loop { last; LEAVE say "bye!" }; say "outside"
<p6eval> niecza v19-7-g5e25209​: OUTPUT«bye!␤outside␤»
<masak> n​: for ^10 { next; LEAVE say "yay!" }; say "outside"
<p6eval> niecza v19-7-g5e25209​:
OUTPUT«yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤outside␤»

Niecza has the behavior I'd expect from Rakudo.

From @coke

On Mon Jul 02 07​:02​:11 2012, masak wrote​:

<masak> r​: loop { last; LEAVE say "bye!" }; say "outside"
<p6eval> rakudo 16db64​: OUTPUT«outside␤»
<masak> do we have this one on file?
<masak> closest I find is
https://rt-archive.perl.org/perl6/Ticket/Display.html?id=113548
* masak submits rakudobug
<masak> r​: for ^10 { next; LEAVE say "yay!" }; say "outside"
<p6eval> rakudo 16db64​: OUTPUT«outside␤»
<masak> that, too.
<masak> n​: loop { last; LEAVE say "bye!" }; say "outside"
<p6eval> niecza v19-7-g5e25209​: OUTPUT«bye!␤outside␤»
<masak> n​: for ^10 { next; LEAVE say "yay!" }; say "outside"
<p6eval> niecza v19-7-g5e25209​:
OUTPUT«yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤outside␤»

Niecza has the behavior I'd expect from Rakudo.

Behavior has changed; we're half right​:

20​:02 < [Coke]> r​: loop { last; LEAVE say "bye!" }; say "outside"
20​:02 <+p6eval> rakudo 604986​: OUTPUT«===SORRY!===␤Error while compiling block
  : Error while compiling op call​: Error while compiling block :
  Error while compiling op bind​: Error while compiling op while​:
  Error while compiling block : Error while compiling op
  p6return​: Operation 'p6return' requires 1 o…
20​:03 < [Coke]> r​: for ^10 { next; LEAVE say "yay!" }; say "outside"
20​:03 <+p6eval> rakudo 604986​:
OUTPUT«yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤yay!␤outside␤»

--
Will "Coke" Coleda

The RT System itself - Status changed from 'new' to 'open'

From @usev6

As noted in April 'next' triggers LEAVE phaser as expected.

With 'last' there is no longer an error, but the LEAVE phaser is still not triggered (same output on Moar, Parrot and JVM)​:

$ perl6 -e 'loop { last; LEAVE say "bye!" }; say "outside"'
outside

I added two tests (the one for 'last' is fuged 'todo') to S04-phasers/enter-leave.t with commit Raku/roast@bba16ae7e0

From @jnthn

On Sun Nov 23 00​:10​:12 2014, bartolin@​gmx.de wrote​:

As noted in April 'next' triggers LEAVE phaser as expected.

With 'last' there is no longer an error, but the LEAVE phaser is still
not triggered (same output on Moar, Parrot and JVM)​:

$ perl6 -e 'loop { last; LEAVE say "bye!" }; say "outside"'
outside

I added two tests (the one for 'last' is fuged 'todo') to S04-
phasers/enter-leave.t with commit
Raku/roast@bba16ae7e0

Was an optimizer issue; it over-eagerly flattened away the loop block, losing the exit handler in the process. Fixed, and test unfudged.

@jnthn - Status changed from 'open' to 'resolved'