DIRECTORY M2D: TYPE USING [ObjClass, StrForm, ObjPtr, HeaderPtr, ModulePtr, StrPtr, RecordPtr, ParPtr]; M2T: CEDAR DEFINITIONS = BEGIN Scope: VAR M2D.HeaderPtr; -- header of scope located by Find Find: PROC [id: CARDINAL] RETURNS [obj: M2D.ObjPtr]; FindField: PROC [id: CARDINAL, rec: M2D.RecordPtr] RETURNS [fld: M2D.ObjPtr]; FindExport: PROC [id: CARDINAL, mod: M2D.ModulePtr] RETURNS [obj: M2D.ObjPtr]; FindDef: PROC [id: CARDINAL] RETURNS [M2D.ObjPtr]; NewObj: PROC [id: CARDINAL, class: M2D.ObjClass] RETURNS [obj: M2D.ObjPtr]; NewStr: PROC [form: M2D.StrForm] RETURNS [M2D.StrPtr]; NewProc: PROC; NewPar: PROC [typ: M2D.StrPtr, varpar: BOOLEAN]; NewImp: PROC [obj: M2D.ObjPtr]; NewExp: PROC [id: CARDINAL]; FirstObj: PROC RETURNS [M2D.ObjPtr]; LastObj: PROC RETURNS [M2D.ObjPtr]; ParamLink: PROC RETURNS [p: M2D.ParPtr]; NewScope: PROC [kind: M2D.ObjClass] RETURNS [hdr: M2D.HeaderPtr]; LinkScope: PROC; CloseScope: PROC; CheckUDP: PROC [obj: M2D.ObjPtr]; ValidateExports: PROC [ancestor: M2D.ModulePtr, qual: BOOLEAN]; Mark: PROC; Release: PROC; InitImpExp: PROC; InitTableHandler: PROC END. žFILE: M2T.mesa Modula-2 Symboltable handler Last Edited by: Gutknecht, September 18, 1985 0:29:25 am PDT Satterthwaite December 10, 1985 5:45:40 pm PST Κ˜Jšœ™Jšœ™šœ<™