get-event-type in mouse-event%
Returns the type of the event; see
mouse-event% for information about each event type. See also
set-event-type .
( -> symbol in send a-mouse-event get-event-type)'(enter leave left-down left-up middle-down middle-up right-down right-up motion)