[perl #126490] [BUG] Control exception handling is inconsistent and broken across backends. (SEGV on moar, CX unrecognized on jvm)

On Mon, 16 Oct 2017 13:04:48 -0700, [email protected] wrote:
> On Sat, 16 Jul 2016 13:18:42 -0700, [email protected] wrote:
> > I unfudged one test for this ticket in S04-statements/label.t with
> > commit https://github.com/perl6/roast/commit/ef7b0da83d
> >
> > The code that used to segfault works fine now:
> >
> > $ perl6-m -e 'A: for 1 { for 1 { last A }; CONTROL { when CX::Last {
> > say "last" }; default { .perl.say } } }'
> > last
> >
> > $ perl6-j -e 'A: for 1 { for 1 { last A }; CONTROL { when CX::Last {
> > say "last" }; default { .perl.say } } }'
> > last
> >
> > The mentioned failing tests for rakudo-j are still a thing, tough.
> 
> The remaining tests fudged with this ticket are passing with rakudo-j
> now. I unfudged them with commit
> https://github.com/perl6/roast/commit/07517a0006

Fixed with commit https://github.com/rakudo/rakudo/commit/1fbb8b4053cba722567b1e376c4a3f655b55e42b
at least on MoarVM.