[perl #76444] [BUG] 'say (my $a) = 1, 2, 3' parses as '(say my $a) = 1, 2, 3' in Rakudo (but as 'say ((my $a) = 1, 2, 3)' in STD.pm6)

[Will Coleda via RT]

On Sat Jul 10 07:02:24 2010, masak wrote:
> <masak> rakudo: say (my $a) = 1,2,3; say $a # discovered by TimToady++
> <p6eval> rakudo 692aa1: OUTPUT«Any()␤»
> <masak> did it ever get reported?
> <jnthn> rakudo: say ((my $a) = 1,2,3);
> <p6eval> rakudo 692aa1: OUTPUT«1 2 3␤»
> <jnthn> rakudo: (say (my $a)) = 1,2,3;
> <p6eval> rakudo 692aa1: OUTPUT«Any()␤»
> <masak> ah.
> <jnthn> It's only a bug if it's not meant to have parsed as the second
> of those.
> * masak asks viv
> <masak> viv puts the 'say' outermost. http://gist.github.com/470719
> * masak submits rakudobug

20:16 < [Coke]> rakudo: say (my $a) = 1,2,3; say $a
20:16 <+p6eval> rakudo 38165a: OUTPUT«1 2 3␤1 2 3␤»
20:16 < [Coke]> rakudo: say ((my $a) = 1,2,3);
20:16 <+p6eval> rakudo 38165a: OUTPUT«1 2 3␤»
20:17 < [Coke]> rakudo: (say (my $a)) = 1,2,3;
20:17 <+p6eval> rakudo 38165a: OUTPUT«Any()␤Cannot assign to a non-container␤  
                in block <anon> at /tmp/df58A5abKz:1␤  in <anon> at 
                /tmp/df58A5abKz:1␤»


Closable?

-- 
Will "Coke" Coleda