home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1992-05-29 | 571 b | 20 lines | [TEXT/MEDT] |
- DEFINITION MODULE M2RA; (* JG 24.10.85 / NW 17.12.85 *)
-
- FROM M2DA IMPORT ObjPtr;
- FROM FileSystem IMPORT File;
-
- VAR ModNo: INTEGER; (* current module number *)
- ModList: ObjPtr; (* list of loaded modules *)
- RefFile: File;
-
-
- PROCEDURE InitRef;
- PROCEDURE InRef (VAR filename: ARRAY OF CHAR; VAR mod: ObjPtr;
- VAR adr, pno: INTEGER);
- PROCEDURE OpenRef;
- PROCEDURE CloseRef(adr, pno: INTEGER);
- PROCEDURE OutUnit(unit: ObjPtr);
- PROCEDURE RefPoint;
-
- END M2RA. (* Copyright Departement Informatik, ETH Zuerich, Switzerland, 1992 *)
-