Optimize use of .sign in infix:<div>.

rakudo · Jul 23, 2010 · 3528a10 · 3528a10
1 parent 937177e
commit 3528a10
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/Int.pm b/src/core/Int.pm
@@ -49,7 +49,7 @@ our multi sub infix:<*>(Int $a, Int $b) {
 
 our multi sub infix:<div>(Int $a, Int $b) {
     my $result = pir::box__PI(pir::div__III($a, $b));
-    if $a.sign * $b.sign < 0 && $result * $b != $a {
+    if ($a * $b).sign < 0 && $result * $b != $a {
         $result--;
     }
     $result;