read-extension-size ( -- )

Vocabulary

images.tga

Inputs

None

Outputs

None

Definition

USING: endian io kernel ;

IN: images.tga

: read-extension-size ( -- )
    2 read le> 495 = [ bad-tga-extension-size ] unless ; inline