Print runtime as a float

2008-11-23 03:10:32 -06:00 · 2008-11-23 03:10:32 -06:00 · d22c0281df
parent 4d9a4c573c
commit d22c0281df
1 changed files with 1 additions and 1 deletions
--- a/basis/tools/time/time.factor
+++ b/basis/tools/time/time.factor
@ -9,7 +9,7 @@ IN: tools.time

 : time. ( data -- )
    unclip
-    "==== RUNNING TIME" print nl pprint " us" print nl
+    "==== RUNNING TIME" print nl 1000000 /f pprint " seconds" print nl
    4 cut*
    "==== GARBAGE COLLECTION" print nl
    [