# New Ticket Created by Vovan-VE
# Please include the string: [perl #132076]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=132076 >
Hello. I'm using rakudo release 2017.07. I'm sure I hit a bug. I could not find
something similar in google, sorry if it is duplicate.Here is code:
use v6.c; sub foo($v) { # Some loop which does a cool stuff for ^1 { # Fail
in some edge case die "BOO!" if 2 == $v; say "inner $v"; }} for 1..3 -> $i
{ say "start outer $i"; try { foo($i); CATCH { default { .say; last; # it
should be applied too lexical `for 1..3` but it controls outsourced loop
from exception stack } } } say "end outer $i";}say "end";
Code and actual/expected output are here:
https://gist.github.com/anonymous/6912bd53ce24af0d76d62d522dfc0b94 . Best
regards.
