Handle the infix:<@lhs, @rhs> case we forgot about last time.

rakudo · Jun 17, 2010 · 2be1d04 · 2be1d04
1 parent fdb5ca4
commit 2be1d04
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/core/operators.pm b/src/core/operators.pm
@@ -424,6 +424,11 @@ our multi sub infix:<...>($lhs, @rhs is copy) {
     ($lhs ... @rhs.shift), @rhs
 }
 
+our multi sub infix:<...>(@lhs, @rhs is copy) {
+    fail "Need something on RHS" if !@rhs;
+    (@lhs ... @rhs.shift), @rhs
+}
+
 our multi sub infix:<eqv>(Mu $a, Mu $b) {
     $a.WHAT === $b.WHAT && $a === $b;
 }