(queue-graft) ( gadget flags -- )

Vocabulary

ui.gadgets.private

Inputs

gadget	an object
flags	an object

Outputs

None

Definition

USING: accessors deques kernel ;

IN: ui.gadgets.private

: (queue-graft) ( gadget flags -- )
    >>graft-state dup graft-queue push-front* >>graft-node drop
    notify-ui-thread ;