monotonic-clock.unix.macosx: use integer arithmetic instead of constructing rationals

diff --git a/basis/monotonic-clock/unix/macosx/macosx.factor b/basis/monotonic-clock/unix/macosx/macosx.factor
index 5bdb8ffa29fa94aeac4788e9306641a03f5447ee..d1412b8d544b4d5d06c94e315e28e2010c139d85 100755 (executable)
--- a/basis/monotonic-clock/unix/macosx/macosx.factor
+++ b/basis/monotonic-clock/unix/macosx/macosx.factor
@@ -21,4 +21,4 @@ M: macosx monotonic-count
     mach_absolute_time
     \ mach_timebase_info <struct> [
         mach_timebase_info [ mach-timebase-info ] unless-zero
-    ] keep [ numer>> ] [ denom>> ] bi / * ;
+    ] keep [ numer>> ] [ denom>> ] bi [ * ] dip /i ;