implement infix:<div>(Int, Int)

rakudo · Aug 31, 2009 · a378770 · a378770
1 parent 17bcd58
commit a378770
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/src/setting/NYI.pm b/src/setting/NYI.pm
@@ -25,10 +25,6 @@ multi infix:«<<==» (*@a) {
     die 'Feed operators are not yet implemented in Rakudo, sorry';
 }
 
-multi infix:<div>($a, $b) {
-    die 'infix:<div> not yet implemented in Rakudo, sorry';
-}
-
 multi infix:<mod>($a, $b) {
     die 'infix:<mod> not yet implemented in Rakudo, sorry';
 }

diff --git a/src/setting/Rat.pm b/src/setting/Rat.pm
@@ -45,3 +45,8 @@ multi sub infix:</>(Rat $a, Rat $b) {
     Rat.new($a.numerator * $b.denominator, $a.denominator * $b.numerator);
 }
 
+multi sub infix:<div>(Int $a, Int $b) {
+    Rat.new($a, $b);
+}
+
+# vim: ft=perl6 sw=4 ts=4 expandtab