Add Real.sign(Real:U:).

rakudo · Jul 26, 2011 · 9c39731 · 9c39731
1 parent 10d4051
commit 9c39731
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/core/Real.pm b/src/core/Real.pm
@@ -3,7 +3,9 @@ class Complex { ... }
 # XxX role Real does Numeric { ... }
 my class Real {
     method abs()  { self < 0 ?? -self !! self }
-    method sign() { self < 0 ?? -1 !! self == 0 ?? 0 !! 1 }
+    proto method sign(|$) {*}
+    multi method sign(Real:U:) { Mu }
+    multi method sign(Real:D:) { self < 0 ?? -1 !! self == 0 ?? 0 !! 1 }
     method sqrt() { self.Bridge.sqrt }
     method sin()  { self.Bridge.sin }
     method cos()  { self.Bridge.cos }