uncompress-bitmap* ( loading-bitmap header -- loading-bitmap )

Vocabulary

images.bitmap

Inputs

loading-bitmap	an object
header	an object

Outputs

loading-bitmap

an object

Definition

IN: images.bitmap

GENERIC: uncompress-bitmap*
    ( loading-bitmap header -- loading-bitmap )

Methods

USING: images.bitmap kernel ;

M: os2-header uncompress-bitmap* drop ;


USING: accessors combinators compression.run-length
images.bitmap ;

M: v-header uncompress-bitmap*
    compression>> {
        { f [ ] }
        { 0 [ ] }
        {
            1
            [
                \ run-length-uncompress-bitmap8
                do-run-length-uncompress
            ]
        }
        {
            2
            [
                \ run-length-uncompress-bitmap4
                do-run-length-uncompress
            ]
        }
        { 3 [ uncompress-bitfield-widths ] }
        { 4 [ "jpeg" unsupported-bitmap-compression ] }
        { 5 [ "png" unsupported-bitmap-compression ] }
    } case ;