cache-canvas-dlist ( canvas quot -- dlist )

Vocabulary

ui.gadgets.canvas

Inputs

canvas	an object
quot	an object

Outputs

dlist

an object

Definition

USING: accessors kernel ;

IN: ui.gadgets.canvas

: cache-canvas-dlist ( canvas quot -- dlist )
    over dlist>> dup [ 2nip ] [ drop make-canvas-dlist ] if ;
    inline