Permalink
Browse files

[t/spec] Correct mistake in array unpacking test, and make it work wi…

…thout reduction operator.

git-svn-id: http://svn.pugscode.org/pugs@29753 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent bb5e45b commit b1a7ce456c65b5086804065f30920e661dbd82e2 jnthn committed Feb 16, 2010
Showing with 2 additions and 2 deletions.
  1. +2 −2 S06-signature/unpack-array.t
View
4 S06-signature/unpack-array.t
@@ -9,10 +9,10 @@ sub foo($x, [$y, *@z]) {
}
my @a = 2, 3, 4, 5;
-is foo(1, @a), '2|3|4;5', 'array unpacking';
+is foo(1, @a), '1|2|3;4;5', 'array unpacking';
sub bar([$x, $y, $z]) {
- return [*] $x, $y, $z;
+ return $x * $y * $z;
}
ok bar(@a[0..2]) == 24, 'fixed length array unpacking';

0 comments on commit b1a7ce4

Please sign in to comment.