Index: /trunk/source/lib/misc.lisp
===================================================================
--- /trunk/source/lib/misc.lisp	(revision 8345)
+++ /trunk/source/lib/misc.lisp	(revision 8346)
@@ -395,5 +395,5 @@
           (ecase internal-time-units-per-second
             (1000000 6)
-            (100  3)))
+            (1000  3)))
          (cpu-count (cpu-count)))
     (format s "~&~S took ~:D ~a (~,vF seconds) to run ~%~20twith ~D available CPU core~P."
