screen-loc* ( gadget -- loc )


Vocabulary
ui.gadgets.slate

Inputs
gadgetan object


Outputs
locan object


Definition
USING: arrays kernel sequences ui.gadgets ;

IN: ui.gadgets.slate

: screen-loc* ( gadget -- loc )
[ screen-loc first ] [ screen-y* ] bi 2array ;