On Sat Jan 10 10:14:44 2009, masak wrote:
> <masak> perl6: my @a = 1..8; sub foo(@a) { say +...@a; bar(@a) }; sub
> bar(@a) { say +...@a }; foo(@a)
> <p6eval> rakudo 35345: OUTPUT«8␤1␤»
> <p6eval> ..pugs: OUTPUT«8␤8␤»
> <p6eval> ..elf 24854: OUTPUT«1␤1␤»
> * masak submits rakudobug

Now fixed in r35392:

  $ ./parrot perl6.pbc
  > my @a = 1..8; sub foo(@a) { say +...@a; bar(@a) }; sub bar(@a) { say
+...@a };  foo(@a);
  8
  8

Assigning ticket to moritz for test suite verification.

Thanks!

Pm

Reply via email to