build-image ( -- image )


Vocabulary
bootstrap.image.private

Inputs
None

Outputs
imagean object


Definition


: build-image ( -- image )
600000 <vector> bootstrapping-image set
60000 <hashtable> objects set
emit-image-header "Building generic words..." print
flush build-generics "Serializing words..." print
flush emit-words "Serializing locals..." print
flush emit-locals "Serializing JIT data..." print
flush emit-jit-data "Serializing global namespace..." print
flush emit-global "Serializing singletons..." print
flush emit-singletons "Serializing special object table..."
print
flush emit-special-objects "Performing word fixups..." print
flush fixup-words "Performing header fixups..." print
flush fixup-header "Image length: " write
bootstrapping-image get length . "Object cache size: " write
objects get assoc-size . \ last-word global delete-at
bootstrapping-image get ;