read-signature ( -- )

Vocabulary

images.tga

Inputs

None

Outputs

None

Definition

USING: io io.encodings.ascii io.encodings.string kernel ;

IN: images.tga

: read-signature ( -- )
    18 read ascii decode "TRUEVISION-XFILE.\0" =
    [ bad-tga-footer ] unless ; inline