steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/bootstrap/stage2.factor
View File

@ -59,7 +59,7 @@ SYMBOL: bootstrap-time
[
! We time bootstrap
system-micros 1000 /i
nano-count
default-image-name "output-image" set-global
@ -84,14 +84,14 @@ SYMBOL: bootstrap-time
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
f error 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
"deploy-vocab" get [