load-factor-image ( filename -- image )


Vocabulary
tools.image

Inputs
filenamea string


Outputs
imagean image


Word description
Load Factor image into memory

Definition
USING: accessors generalizations io io.encodings.binary io.files
kernel math ;

IN: tools.image

: load-factor-image ( filename -- image )
binary [
read-footer [ dup image-offset>> read* ] [ f f ] if*
read-header dup
[ compressed-data-size>> read* ]
[ compressed-code-size>> read* ] bi 6 nrot tell-input -
read*
] with-file-reader image boa ;