add another &infix:<...> multi to handle the case 3 ... $+2, $max

rakudo · Oct 4, 2009 · a796cf1 · a796cf1
1 parent db7c668
commit a796cf1
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/src/setting/Operators.pm b/src/setting/Operators.pm
@@ -10,8 +10,14 @@ multi sub infix:<...> (@lhs, @rhs) {
     }
 }
 
+multi sub infix:<...>($lhs, @rhs) {
+    my @a = $lhs;
+    &infix:<...>(@a, @rhs);
+}
+
 multi sub infix:<...>($lhs, Code $generator) {
-    &infix:<...>([$lhs], $generator);
+    my @a = $lhs;
+    &infix:<...>(@a, $generator);
 }
 
 multi sub infix:<...> (@lhs, Code $generator, :$limit) {