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


[
    ! We time bootstrap
    millis >r

    default-image-name "output-image" set-global


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

        millis swap - bootstrap-time set-global
        print-report

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