png-component ( loading-png -- obj )

Vocabulary

images.png

Inputs

loading-png

an object

Outputs

obj

an object

Definition

USING: accessors combinators images ;

IN: images.png

: png-component ( loading-png -- obj )
    bit-depth>> {
        { 1 [ ubyte-components ] }
        { 2 [ ubyte-components ] }
        { 4 [ ubyte-components ] }
        { 8 [ ubyte-components ] }
        { 16 [ ushort-components ] }
        [ unknown-component-type ]
    } case ;