--file OpTableDefs.mesa  edited by Johnsson, May 1, 1978  8:46 AM
DIRECTORY
  AltoDefs: FROM "AltoDefs";

OpTableDefs: DEFINITIONS =
  BEGIN

-- from OpTable
  OpTable: PROGRAM;
  pushstack: PROCEDURE [b: AltoDefs.BYTE] RETURNS [[0..3]];
  popstack: PROCEDURE [b: AltoDefs.BYTE] RETURNS [[0..7]];
  instlength: PROCEDURE [b: AltoDefs.BYTE] RETURNS [[0..3]];
  instaligned: PROCEDURE [b: AltoDefs.BYTE] RETURNS [BOOLEAN];

  -- from OpNames
  OpNames: PROGRAM;
  InstName: PROCEDURE [AltoDefs.BYTE] RETURNS [STRING];
  UnknownInstruction: SIGNAL[name: STRING];
  InstCode: PROCEDURE [name: STRING] RETURNS [i: AltoDefs.BYTE];

  END.