event-loc ( event -- loc )

Vocabulary

ui.backend.gtk2

Inputs

event

an object

Outputs

loc

an object

Definition

USING: accessors arrays kernel math ;

IN: ui.backend.gtk2

: event-loc ( event -- loc )
    [ x>> ] [ y>> ] bi [ >fixnum ] bi@ 2array ;