parse-color-palette ( loading-bitmap -- loading-bitmap )

Vocabulary

images.bitmap

Inputs

loading-bitmap

an object

Outputs

loading-bitmap

an object

Definition

USING: accessors io kernel ;

IN: images.bitmap

: parse-color-palette ( loading-bitmap -- loading-bitmap )
    dup color-palette-length read >>color-palette ;