<<>> <> <> <> <> <<>> <> <<>> DIRECTORY Xl USING [Event]; XlEventProperties: CEDAR DEFINITIONS ~ BEGIN GetEventProp: PROC [ev: Xl.Event, key: REF] RETURNS [REF]; <> <<>> PutEventProp: PROC [ev: Xl.Event, key, val: REF] RETURNS [REF]; <> <> <<>> END.