<> <> <> DIRECTORY IO USING [STREAM], Rope USING [ROPE] ; ReminderDefs: CEDAR DEFINITIONS = BEGIN ParameterList: TYPE = LIST OF REF Parameter; Parameter: TYPE = RECORD[class: ParameterClass, value: Rope.ROPE]; ParameterClass: TYPE = {text, repeat, duration, until, startTime, leadTime, message, iconFlavor, iconLabel, iconLabelType}; RegisterEvent: PROC [parameters: ParameterList _ NIL, scanThis: Rope.ROPE _ NIL, out: IO.STREAM]; <> <> <> <> <<>> RegisterKeyWord: PROC [keyWord: Rope.ROPE, parameters: ParameterList]; <> << >> ReadParameters: PROC [stream: IO.STREAM] RETURNS[ParameterList]; Error: ERROR [ec: ErrorCode, msg: Rope.ROPE _ NIL]; ErrorCode: TYPE = {formatError, timeRopeFormatError, noReminderFile, timeNotSpecified}; END.