read-logical-screen-descriptor ( loading-gif -- loading-gif )

Vocabulary

images.gif

Inputs

loading-gif

an object

Outputs

loading-gif

an object

Definition

USING: accessors endian io ;

IN: images.gif

: read-logical-screen-descriptor
    ( loading-gif -- loading-gif )
    2 read le> >>width 2 read le> >>height 1 read le> >>flags
    1 read le> >>background-color
    1 read le> >>default-aspect-ratio ;