Fix Num.ACCEPTS(Complex), and implement Rat.ACCEPTS.

rakudo · Mar 14, 2010 · 2751645 · 2751645
1 parent 345f63d
commit 2751645
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 1 deletion.
diff --git a/src/core/Num.pm b/src/core/Num.pm
@@ -1,3 +1,5 @@
+class Complex { ... }
+
 augment class Num {
     multi method ACCEPTS($other) {
         if self eq 'NaN' {
@@ -6,7 +8,7 @@ augment class Num {
             $other == self;
         }
     }
-    multi method ACCEPTS(::Complex $other) {
+    multi method ACCEPTS(Complex $other) {
         if self eq 'NaN' {
             $other.re eq 'NaN' || $other.im eq 'NaN';
         } else {

diff --git a/src/core/Rat.pm b/src/core/Rat.pm
@@ -23,6 +23,10 @@ class Rat {
         self.bless(*, :numerator($numerator), :denominator($denominator));
     }
 
+    multi method ACCEPTS($other) {
+        self.Num.ACCEPTS($other);
+    }
+
     multi method perl() { "$!numerator/$!denominator"; }
 
     our Bool multi method Bool() { $!numerator != 0 ?? Bool::True !! Bool::False }