[perl #63430] return statements in CATCH blocks cause infinite regress in Rakudo

[Will Coleda via RT]

On Mon Feb 23 22:36:18 2009, masak wrote:
> <masak> rakudo: sub s { try { return 1; CATCH { return 2 } } }; say s
> <masak> OK, seems like the try block catches return exceptions.
> <p6eval> rakudo 2a9382: No output (you need to produce output to STDOUT)
> * masak submits rakudobug

19:27 < [Coke]> rakudo: sub s { try { return 1; CATCH { return 2 } } }; say s
19:27 <+p6eval> rakudo 38907e: OUTPUT«1␤»

Fixed, already has tests.

-- 
Will "Coke" Coleda