<<>> <> <> <> <> <<>> <> <> <> <<>> DIRECTORY XTk USING [Event, Widget, WidgetNotifyProc]; XTkNotification: CEDAR DEFINITIONS ~ BEGIN <> <<>> RegisterGlobal: PROC [key: REF, proc: XTk.WidgetNotifyProc, registerData: REF ¬ NIL, front: BOOL ¬ FALSE]; <> <> <> CallAll: PROC [key: REF, widget: XTk.Widget, callData: REF ¬ NIL, event: XTk.Event ¬ NIL]; <> <> <<>> END.