DEFINITION MODULE SYSTEM;


TYPE


   BYTE;    (* 1 byte *)
   WORD;  (* 2 bytes *)
   LONGWORD;  (* 4 bytes *)
   LOC = BYTE;
   ADDRESS = POINTER TO LOC;  (* 4 bytes *)


 PROCEDURE ADR():ADDRESS;
 PROCEDURE TSIZE():CARDINAL;
 PROCEDURE INLINE();
 PROCEDURE REG():CARDINAL;
 PROCEDURE SETREG();
 PROCEDURE LONG():INTEGER;
 PROCEDURE SHIFT():INTEGER;
 PROCEDURE SHORT()INTEGER;
 PROCDURE CAST(<type>, <var>):int32typ;
 PROCEDURE ADDADR(addrtyp, CARDINAL):addrtyp;
 PROCEDURE SUBADR(addrtyp, CARDINAL):addrtyp;