[perl #131567] [REGRESSION] `do LABEL: for 1 { next LABEL }` doesn't see the label since 2016.07 commit

[Zoffix Znet via RT]

On Tue, 13 Jun 2017 07:26:15 -0700, c...@zoffix.com wrote:
> m: do LABEL: for 1 { next LABEL }
> rakudo-moar 4aa60a: OUTPUT: «labeled next without loop construct␤  in
> block <unit> at <tmp> line 1␤␤»
> 
> Bisectable points to
> https://github.com/rakudo/rakudo/commit/5581b24111589683dcd50356a9de2bcf60ae3bb2
> 
> IRC discussion that found the issue: https://irclog.perlgeek.de/perl6-
> dev/2017-06-13#i_14726123

Thank you for the report. This is now fixed.

Fix:   https://github.com/rakudo/rakudo/commit/3b67b4acea
Tests: https://github.com/perl6/roast/commit/9f418777bc