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

[Christian Bartolomaeus via RT]

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.