Text preview for : TrapDefs.mesa_Sep78.pdf part of xerox TrapDefs.mesa Sep78 xerox mesa 4.0_1978 listing Mesa_4_System TrapDefs.mesa_Sep78.pdf
Back to : TrapDefs.mesa_Sep78.pdf | Home
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 ...