render-cairo ( gadget -- alien )

Vocabulary

cairo-gadgets

Inputs

gadget

an object

Outputs

alien

an object

Definition

USING: cairo-gadgets.private cairo.ffi kernel ;

IN: cairo-gadgets

: render-cairo ( gadget -- alien )
    [
        image-dims
        [ image-buffer dup CAIRO_FORMAT_ARGB32 ]
        [ cairo_image_surface_create_for_data ] 3bi
    ] [ [ render-cairo* ] curry with-cairo-from-surface ] bi ;