load-factor-image ( filename -- image )

Vocabulary

tools.image-compressor

Inputs

filename

a string

Outputs

image

an image

Word description

Load Factor image into memory

Definition

USING: accessors classes.struct io.encodings.binary io.files
kernel tools.image-analyzer.vm tools.image-compressor.private ;

IN: tools.image-compressor

: load-factor-image ( filename -- image )
    binary [
        read-footer*
        [ dup image_offset>> read* ] [ B{ } clone B{ } clone ]
        if*
        image-header read-struct check-header
        >compression-header dup
        [ compressed-data-size>> read* ]
        [ compressed-code-size>> read* ] bi
    ] with-file-reader image boa ;