RoseEvents.Mesa
Last Edited by: Spreitzer, September 3, 1984 2:04:35 pm PDT
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.