# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #112838]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org:443/rt3/Ticket/Display.html?id=112838 >
r: my $a = 3; sub transaction { let $a = 7; say "a = $a.
Commiting"; OUTER::<$a>
r: sub f { UNDO say 'leaving A' ; fail "foo"; }; f
rakudo 24ffc9: ( no output )
yeah. should trigger.
same underlying cause
Hmm, what underlies that one?
because let uses an UNDO to restore the state
And UNDO...doesn't trigger here?
