home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / MacMETH 3.2.1 / Sources / System.DEF < prev   
Encoding:
Text File  |  1992-12-29  |  4.4 KB  |  12 lines  |  [TEXT/MEDT]
  1. DEFINITION MODULE System; (* HS, 1.10.85 *)
  2.  
  3.   (* 'System' for MC68000/MC68010 runtime support of Modula-2. *)
  4.  
  5.   (* these are the first 27 procedures in module System: they  *)
  6.   (* support the compiler for the implementation of ADDRESS,   *)
  7.   (* LONGINT, REAL and LONGREAL arithmetic, the HALT-statement *)
  8.   (* and some compiler-generated error halts.                  *)
  9.  
  10.   (* System procedure numbers used by the compiler :
  11.   BodyOfSystem        = 0; (* 0 is reserved for module body       *)
  12.   HALTX