From @masak

<masak> std​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 124m␤»
<masak> rakudo​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
* masak submits rakudobug
<masak> niecza​: (sub r { say "OH HAI" })() for 5
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤»
<masak> rakudo​: (sub r { say "OH HAI" })() for 5 [16​:22]
<p6eval> rakudo ecc4ef​: OUTPUT«Could not find sub code_73␤ in <anon>
at line 22​:/tmp/LeVlNG7yDT␤ in main program body at line 1␤»
<sbp> std​: (sub r { say "OH HAI" })() for 5
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 120m␤»
<masak> rakudo​: say "compiles OK"; (sub r { say "OH HAI" })() for 5
<p6eval> rakudo ecc4ef​: OUTPUT«compiles OK␤Could not find sub code_73 [...]
<masak> rakudo​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«alive␤»
<masak> wtf
<masak> niecza​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤alive␤»
<TimToady> sink bug?
<TimToady> rakudo​: for 5 { say "OH HAI" }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«OH HAI␤alive␤»
<TimToady> not sink bug

Arguably two distinct bugs. There's a strange error with the statement
modifier, and there's absolutely nothing with the normal for loop.

From @jnthn

On Mon Apr 25 07​:33​:54 2011, masak wrote​:

<masak> std​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 124m␤»
<masak> rakudo​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
* masak submits rakudobug
<masak> niecza​: (sub r { say "OH HAI" })() for 5
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤»
<masak> rakudo​: (sub r { say "OH HAI" })() for 5 [16​:22]
<p6eval> rakudo ecc4ef​: OUTPUT«Could not find sub code_73␤ in <anon>
at line 22​:/tmp/LeVlNG7yDT␤ in main program body at line 1␤»
<sbp> std​: (sub r { say "OH HAI" })() for 5
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 120m␤»
<masak> rakudo​: say "compiles OK"; (sub r { say "OH HAI" })() for 5
<p6eval> rakudo ecc4ef​: OUTPUT«compiles OK␤Could not find sub code_73
[...]
<masak> rakudo​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«alive␤»
<masak> wtf
<masak> niecza​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤alive␤»
<TimToady> sink bug?
<TimToady> rakudo​: for 5 { say "OH HAI" }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«OH HAI␤alive␤»
<TimToady> not sink bug

Arguably two distinct bugs. There's a strange error with the statement
modifier, and there's absolutely nothing with the normal for loop.

Both fixed​:

for 5 { (sub { say "OH HAI" })() }; say "alive"
OH HAI
alive
(sub r { say "OH HAI" })() for 5
OH HAI

Tagging testneeded.

/jnthn

The RT System itself - Status changed from 'new' to 'open'

From @peschwa

Am Mi 19. Okt 2011, 14​:33​:15, jnthn@​jnthn.net schrieb​:

On Mon Apr 25 07​:33​:54 2011, masak wrote​:

<masak> std​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 124m␤»
<masak> rakudo​: my %h=1=>"happy";my %s;say [$_,(sub r {return "sad"
if%s{$^n}++;%h{$n}//=r [+] $n.comb»**»2})($_)] for ^10
* masak submits rakudobug
<masak> niecza​: (sub r { say "OH HAI" })() for 5
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤»
<masak> rakudo​: (sub r { say "OH HAI" })() for 5 [16​:22]
<p6eval> rakudo ecc4ef​: OUTPUT«Could not find sub code_73␤ in <anon>
at line 22​:/tmp/LeVlNG7yDT␤ in main program body at line 1␤»
<sbp> std​: (sub r { say "OH HAI" })() for 5
<p6eval> std 3468e14​: OUTPUT«ok 00​:01 120m␤»
<masak> rakudo​: say "compiles OK"; (sub r { say "OH HAI" })() for 5
<p6eval> rakudo ecc4ef​: OUTPUT«compiles OK␤Could not find sub code_73
[...]
<masak> rakudo​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«alive␤»
<masak> wtf
<masak> niecza​: for 5 { (sub { say "OH HAI" })() }; say "alive"
<p6eval> niecza v4-70-gfb79b12​: OUTPUT«OH HAI␤alive␤»
<TimToady> sink bug?
<TimToady> rakudo​: for 5 { say "OH HAI" }; say "alive"
<p6eval> rakudo ecc4ef​: OUTPUT«OH HAI␤alive␤»
<TimToady> not sink bug

Arguably two distinct bugs. There's a strange error with the statement
modifier, and there's absolutely nothing with the normal for loop.

Both fixed​:

for 5 { (sub { say "OH HAI" })() }; say "alive"
OH HAI
alive
(sub r { say "OH HAI" })() for 5
OH HAI

Tagging testneeded.

/jnthn

Added tests to roast in commit 06a737b as per the examples above.

@FROGGS - Status changed from 'open' to 'resolved'