-- TrapDefs.Mesa  Edited by Sandman on June 30, 1980  5:08 PM
-- Copyright  Xerox Corporation 1979, 1980

DIRECTORY
  ControlDefs USING [ControlLink, FrameHandle, GlobalFrameHandle];

TrapDefs: DEFINITIONS =
  BEGIN OPEN ControlDefs;

  -- Faults

  StartFault: SIGNAL [dest: GlobalFrameHandle];
  StackError: ERROR;
  PortFault: ERROR;
  LinkageFault: ERROR;
  ControlFault: SIGNAL [source: FrameHandle] RETURNS [ControlLink];
  UnboundProcedure: SIGNAL [dest: UNSPECIFIED] RETURNS [ControlLink];
  ParityError: SIGNAL [address: POINTER];
  PhantomParityError: SIGNAL;
  BoundsFault: SIGNAL;
  PointerFault: SIGNAL;
  ZeroDivisor: SIGNAL;
  DivideCheck: SIGNAL;
  UnimplementedInst: SIGNAL;
  WakeupError: SIGNAL;
  PageFault: SIGNAL [page: CARDINAL];
  WriteProtectFault: SIGNAL [page: CARDINAL];
  HardwareError: SIGNAL;

  -- Signal Stuff

  SendMsgSignal: SIGNAL RETURNS [msg: UNSPECIFIED, signal: UNSPECIFIED];
  ResumeError: SIGNAL;

  StartTrace: PROCEDURE [
    loc: POINTER, val: UNSPECIFIED, mask: WORD, equal: BOOLEAN];
  StopTrace: PROCEDURE;

  END...