report times in ms again

diff --git a/basis/bootstrap/stage2.factor b/basis/bootstrap/stage2.factor
index bd8f53266002be6c8a02ffeb45f9abcb161f62de..d476afa8c327423231e5a1e949a20ef39fd6d412 100644 (file)
--- a/basis/bootstrap/stage2.factor
+++ b/basis/bootstrap/stage2.factor
@@ -59,7 +59,7 @@ SYMBOL: bootstrap-time
 
 [
     ! We time bootstrap
-    system-micros
+    system-micros 1000 /i
 
     default-image-name "output-image" set-global
 
@@ -84,14 +84,14 @@ SYMBOL: bootstrap-time
 
     load-components
 
-    system-micros over - core-bootstrap-time set-global
+    system-micros 1000 /i over - core-bootstrap-time set-global
 
     run-bootstrap-init
 
     f error set-global
     f error-continuation set-global
 
-    system-micros swap - bootstrap-time set-global
+    system-micros 1000 /i swap - bootstrap-time set-global
     print-report
 
     "deploy-vocab" get [