make-bitmap-image ( dim quot -- image )

Vocabulary

cairo

Inputs

dim	an object
quot	an object

Outputs

image

an object

Definition

USING: accessors cairo.ffi images images.memory kernel ;

IN: cairo

: make-bitmap-image ( dim quot -- image )
    [
        [
            <image-surface>
            &cairo_surface_destroy <cairo> &cairo_destroy
        ]
    ] dip compose make-memory-bitmap BGRA >>component-order
    ubyte-components >>component-type ; inline