DIRECTORY IO: TYPE USING [STREAM], Rope: TYPE USING [ROPE], M2D: TYPE USING [ObjPtr, HeaderPtr, ModulePtr]; M2R: CEDAR DEFINITIONS = BEGIN ModNo: VAR CARDINAL; -- current module number ModList: VAR M2D.HeaderPtr; -- list of loaded modules RefFile: VAR IO.STREAM; InitRef: PROC; Create: PROC [modname: CARDINAL, modkey: LONG CARDINAL] RETURNS [mod: M2D.ModulePtr]; InRef: PROC [filename: Rope.ROPE] RETURNS [mod: M2D.ModulePtr, adr, pno: CARDINAL]; OpenRef: PROC; CloseRef: PROC [adr, pno: CARDINAL]; OutUnit: PROC [unit: M2D.ObjPtr]; OutPos: PROC [sourcepos, pc: CARDINAL] END. ░FILE: M2R.mesa Modula-2 Referencefile and symbolfile handler Last Edited by: Gutknecht, September 18, 1985 1:07:16 pm PDT Satterthwaite December 10, 1985 9:58:14 am PST Э╩fШJЪЬЩJЪЬ-Щ-ЪЬ<Щ