use nano-count for timing bootstrap

db4
Doug Coleman 2009-11-19 18:24:34 -06:00
parent d9d2fe6c92
commit 2711456935
1 changed files with 3 additions and 3 deletions

View File

@ -59,7 +59,7 @@ SYMBOL: bootstrap-time
[ [
! We time bootstrap ! We time bootstrap
system-micros 1000 /i nano-count
default-image-name "output-image" set-global default-image-name "output-image" set-global
@ -84,14 +84,14 @@ SYMBOL: bootstrap-time
load-components load-components
system-micros 1000 /i over - core-bootstrap-time set-global nano-count over - 1000000 /i core-bootstrap-time set-global
run-bootstrap-init run-bootstrap-init
f error set-global f error set-global
f error-continuation set-global f error-continuation set-global
system-micros 1000 /i swap - bootstrap-time set-global nano-count swap - 1000000 /i bootstrap-time set-global
print-report print-report
"deploy-vocab" get [ "deploy-vocab" get [