<> <> <> DIRECTORY M2D USING [ObjPtr, StrPtr, ProcPtr], M2G USING [LabelTabPtr], M2H USING [ItemPtr]; M2Q: CEDAR DEFINITIONS = BEGIN InitQ: PROC; Type: PROC RETURNS [typ: M2D.StrPtr]; FormalType: PROC RETURNS [typ: M2D.StrPtr]; OpaqueType: PROC RETURNS [typ: M2D.StrPtr]; CaseLabelList: PROC [Ltyp: M2D.StrPtr, n: CARDINAL, tab: M2G.LabelTabPtr] RETURNS [N: CARDINAL]; FormalParameters: PUBLIC PROC [proc: M2D.ProcPtr]; ActualParameters: PROC [x: M2H.ItemPtr]; StandProcCall: PROC [p: M2H.ItemPtr]; Selector: PROC [x: M2H.ItemPtr, obj: M2D.ObjPtr]; ConstExpression: PROC [x: M2H.ItemPtr]; Expression: PROC [x: M2H.ItemPtr]; END.