with-w/h ( gadget quot -- )

Vocabulary

ui.utils

Inputs

gadget	an object
quot	an object

Outputs

None

Definition

USING: namespaces opengl ui.render ;

IN: ui.utils

: with-w/h ( gadget quot -- )
    '[ origin get _ with-translation ] with-dim ; inline