Remove Complex ** Any and Any ** Complex, as they should no longer be…

… needed. Change Any * Any to convert its arguments to Numeric and call multiply on them then.
rakudo · Apr 29, 2010 · 0857098 · 0857098
1 parent 3966c62
commit 0857098
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 9 deletions.
diff --git a/src/core/Complex.pm b/src/core/Complex.pm
@@ -324,14 +324,6 @@ multi sub infix:<**>(Complex $a, Complex $b) {
    ($a.log * $b).exp;
 }
 
-multi sub infix:<**>(Complex $a, $b) {
-   ($a.log * $b).exp;
-}
-
-multi sub infix:<**>($a, Complex $b) {
-    ($a.log * $b).exp;
-}
-
 multi sub infix:<**>(Complex $a, Real $b) {
    ($a.log * $b).exp;
 }

diff --git a/src/core/operators.pm b/src/core/operators.pm
@@ -42,7 +42,7 @@ our multi sub infix:<->($a, $b) {
 }
 
 our multi sub infix:<*>($a, $b) {
-    pir::mul__NNN($a, $b)
+    +$a * +$b;
 }
 
 our multi sub infix:</>($a, $b) {