XlEventProperties.mesa
Copyright Ó 1992 by Xerox Corporation. All rights reserved.
Created by Christian Jacobi, April 21, 1992 1:35:26 pm PDT
Christian Jacobi, April 21, 1992 2:24 pm PDT
Property lists on Xl events.
DIRECTORY Xl USING [Event];
XlEventProperties: CEDAR DEFINITIONS ~
BEGIN
GetEventProp: PROC [ev: Xl.Event, key: REF] RETURNS [REF];
Fetches a value from the events property list; returns NIL if not found.
PutEventProp: PROC [ev: Xl.Event, key, val: REF] RETURNS [REF];
Puts a property (key value pair) on the events property list and returns the previous value.
A NIL value removes the property.
END.