Fix Numeric.exp($base). Add "multi" to Num.exp.

rakudo · Jul 16, 2011 · afc5299 · afc5299
1 parent d7d46e3
commit afc5299
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/core/Num.pm b/src/core/Num.pm
@@ -62,7 +62,7 @@ my class Num {
         nqp::p6box_n(nqp::abs_n(nqp::unbox_n(self)));
     }
 
-    method exp() {
+    multi method exp() {
         nqp::p6box_n(pir::exp__Nn(nqp::unbox_n(self)));
     }
 

diff --git a/src/core/Numeric.pm b/src/core/Numeric.pm
@@ -14,7 +14,7 @@ my class Numeric {
 
     proto method exp(|$) {*}
     multi method exp(Numeric $base) {
-        self.exp * $base.log;
+        $base ** self;
     }
     method roots(Cool $n) { self.Complex.roots($n.Int) }
     multi method Bool(Numeric:D:) { self != 0 }