On Sat Nov 08 00:54:52 2008, ihrd wrote:
>
> sub foo (@a) { 1.say for @a }
> foo((1,2,3,4)); # only one 1
> foo([1,2,3,4]); # only one 1
> foo( my @a = 1,2,3 ); # only one 1
Now fixed as of r35392:
$ ./parrot perl6.pbc
> sub foo(@a) { 1.say for @a }
> foo((1,2,3,4));
1
1
1
1
> foo([1,2,3,4]);
1
1
1
1
> foo( my @a = 1,2,3 );
1
1
1
>
Tests already exist in the suite, so closing ticket. Thanks!
Pm
