[perl #126517] [JVM] can't have sub as implicit return of sub

[via RT]

# New Ticket Created by  Will Coleda 
# Please include the string:  [perl #126517]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=126517 >


This dies, but only on the JVM:

13:41 < [Coke]> r: sub foo($a) { sub bar {} }; my $a=foo(1);
13:41 <+camelia> rakudo-moar a05867: ( no output )
13:41 <+camelia> ..rakudo-jvm a05867: OUTPUT«java.lang.NullPointerException␤
                 in block <unit> at /tmp/tmpfile:1␤␤»

It's required for (at least) several tests in S02-magicals/sub.t

Also:

13:42 < lizmat> [Coke]: that is a known issue, several places in the core work
                around that
13:42 < lizmat> r: sub foo($a) { my $ = sub bar {} }; my $a=foo(1);
13:42 <+camelia> rakudo-{moar,jvm} a05867: ( no output )


-- 
Will "Coke" Coleda