uncompressed-code? ( image -- ? )

Vocabulary

tools.image

Inputs

image

an image

Outputs

?

a boolean

Word description

Check if stored code heap is uncompressed

Definition

USING: accessors kernel ;

IN: tools.image

: uncompressed-code? ( image -- ? )
    header>> [ code-size>> ] [ compressed-code-size>> ] bi = ;