home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / progtool / modula2 / pl0 / pl0inter.def < prev    next >
Encoding:
Modula Definition  |  1994-09-22  |  412 b   |  27 lines
  1.  
  2. DEFINITION MODULE PL0Interpreter;
  3.  
  4. CONST
  5.   maxfct = 15;
  6.   maxlev = 15;
  7.   maxadr = 1023;
  8.   
  9. TYPE 
  10.   Instruction = RECORD
  11.                   f : [0..maxfct];
  12.                   l : [0..maxlev];
  13.                   a : [0..maxadr];
  14.                 END;
  15.                 
  16. VAR
  17.   code : ARRAY [0..maxadr] OF Instruction;
  18.   
  19.  
  20. PROCEDURE Interpret;
  21.  
  22. PROCEDURE EndInterpreter;
  23.  
  24. END PL0Interpreter.
  25.  
  26.  
  27.