     [
         load-components
 
+        millis over - core-bootstrap-time set-global
+
         run-bootstrap-init
     ] with-compiler-errors
     :errors

            ] [ print-error 1 exit ] recover
        ] set-boot-quot

        millis r> - dup bootstrap-time set-global
        print-report

        "output-image" get save-image-and-exit

definitions assocs compiler.errors compiler.units
math.parser generic sets debugger command-line ;
IN: bootstrap.stage2

SYMBOL: core-bootstrap-time

SYMBOL: bootstrap-time

