<> <> RoseEvents: CEDAR DEFINITIONS = BEGIN Watcher: TYPE = RECORD [ Notify: NotifyProc, watcherData: REF ANY _ NIL]; NotifyProc: TYPE = PROC [event: ATOM, watched, watcherData, arg: REF ANY]; AddWatcher, RemoveWatcher: PROC [event: ATOM, watcher: Watcher, watched: REF ANY _ NIL]; Notify: PROC [event: ATOM, watched: REF ANY _ NIL, handleAborted: BOOLEAN _ FALSE, arg: REF ANY _ NIL]; END.