[perl #60966] wrong data pass

[jn...@jnthn.net via RT]

On Mon Dec 01 05:13:01 2008, tantra wrote:
> In this code, result will be 123, but i think that it must be 1.
> 
> sub test(@test is copy)
> {
>     @test[0] = 123;
> };
> 
> my @test = (1, 2, 3);
> test(@test);
> 
> print @test[0];

Indeed - fixed in git 6059ad9 and added tests to S06-traits/is-copy.t
(also fixed the "%test is copy" case and added tests for that).

Thanks!

Jonathan