# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #124279]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=124279 >
<TimToady> r: gather loop { take my $foo; last; }
<camelia> rakudo-moar 5a38b2: ( no output )
<camelia> ..rakudo-jvm 5a38b2: OUTPUT«cannot connect to eval server:
Connection refused»
<TimToady> masak: ^^^ there's a minimal test case to blow up perl6-j
<TimToady> masak: (that produces the error at
https://gist.github.com/anonymous/9dc73118674e46248155)
Exception in thread "main" org.perl6.nqp.runtime.UnwindException
at org.perl6.nqp.runtime.ThreadContext.<init>(ThreadContext.java:120)
at
org.perl6.nqp.runtime.GlobalContext.getCurrentThreadContext(GlobalContext.java:335)
at org.perl6.nqp.runtime.GlobalContext.<init>(GlobalContext.java:250)
at org.perl6.nqp.runtime.CompilationUnit.enterFromMain(CompilationUnit.java:56)
at perl6.main(gen/jvm/main.nqp)
* masak submits rakudobug
<FROGGS> masak: hold on
<FROGGS> might be the same as https://rt.perl.org/Ticket/Display.html?id=122134
<TimToady> it might at that
<TimToady> otoh, if I remove the gather, it passes
<TimToady> so maybe not
