<> <> <> <> DIRECTORY CD USING [DesignPosition, Design]; CDMark: CEDAR DEFINITIONS = BEGIN GetMark: PROC [design: CD.Design] RETURNS [CD.DesignPosition]; -- returns always some position, even if there is no mark SetMark: PROC [design: CD.Design, pos: CD.DesignPosition]; <<>> END. <<--This Module is temporary; if Marks will work properly and integrated,>> <<--Mark will be exported elsewhere>>