From 3d5ea28358d4a2bce59a3b6e744ce6b31cff2ab5 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Tue, 17 Nov 2009 01:47:01 -0600
Subject: [PATCH] monotonic-clock.unix.macosx: use integer arithmetic instead
 of constructing rationals

---
 basis/monotonic-clock/unix/macosx/macosx.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/monotonic-clock/unix/macosx/macosx.factor b/basis/monotonic-clock/unix/macosx/macosx.factor
index 5bdb8ffa29..d1412b8d54 100755
--- 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 ;