xerox TrapDefs.mesa Sep78 free download

File name TrapDefs.mesa_Sep78.pdf

TrapDefs.mosa 2-Sep-78 18:05:56 Page 1 -- TrapDefs.Mesa Edited by Sandman on April 10, 1978 11:03 AM DIRECTORY ControlDefs: FROM "controldefs"; DEFINITIONS FROM ControlDefs; TrapDefs: DEFINITIONS = BEGIN -- Faults StartFault: SIGNAL [dest: GlobalframeHandle]; StackError: ERROR [FrameHandleJ; PortFault: ERROR; LinkageFault: ERROR; ControlFault: SIGNAL [source: FrameHandleJ RETURNS [ControlLinkJ; UnboundProcedure: SIGNAL [dest: Control Link] RETURNS [ControlLink]; ParityError: SIGNAL [address: POINTER]; PhantomParityError: SIGNAL; -- Signal Stuff SendMsgSignal: SIGNAL RETURNS [UNSPECIFIED, UNSPECIFIEDJ; ResumeError: SIGNAL; -- Xfer Trap Stuff TrapReason: TYPE = {other, localCall, return}; TrapState: TYPE = {off, on, pending}; TrapStatus: TYPE = MACHINE DEPENDENT RECORD [ fill1: [O .. l77B], reason: TrapReason, fi112: [0 .. 37BJ, state: TrapStateJ; TrapParameter: TYPE = RECORD [ SELECT OVERLAID * FROM other =) [ link: ControlLink], localCall =) [ ep: CARDINALJ, Actually 2*ep+2 return =) [ frame: FrameHandleJ, Actually frame+6 ENDCASE]; NullReason: TrapReason = LOOPHOLE[O]; TraceOff: TrapStatus = [0, NullReason, 0, off]; TraceNext: TrapStatus = [0, NullReason, 0, pendingJ; END ...