IFUPLAPass.mesa
Copyright c 1984 by Xerox Corporation. All rights reserved.
McCreight, May 20, 1986 6:20:55 pm PDT
Curry, June 2, 1986 11:20:14 am PDT
DIRECTORY
Dragon,
PLAOps;
IFUPLAPass: CEDAR DEFINITIONS =
BEGIN
RtDrFromPads: TYPE = RECORD [ -- default must be zero
eUCondition2:  BOOL     ← FALSE,  -- BA <= B
dPFault:    Dragon.PBusFaults ← none ];  -- BA <= B
RtDrToPads: TYPE = RECORD [ -- default must be zero
eUAluOp2:   Dragon.ALUOps  ← Or,   -- A  => AB
eUCondSel2:   Dragon.CondSelects ← False,  -- A  => AB
eURes3BisPBus3:  BOOL     ← FALSE,  -- A  => AB
eUWriteToPBus3: BOOL     ← FALSE,  -- A  => AB
dPCmnd3:  Dragon.PBusCommands ← NoOp ]; -- A  => AB
LtDrToPads: TYPE = RECORD [ -- default must be zero
iPFetch:    BOOL ← FALSE ];     -- BA  <= NewFetchBA
LtDrFromPads: TYPE = RECORD [ -- default must be zero
iPReject:    BOOL ← FALSE,      -- B  => BA
iPFaulting:   BOOL ← FALSE,      -- B  => BA
reset:     BOOL ← FALSE,      -- AB  => BA
reschedule:   BOOL ← FALSE ];     -- AB  => BA
LtDrDebug: TYPE = RECORD [ -- default must be zero
debugOpStatus:  BOOL ← FALSE,      --  <debug>
debugABGD:   BOOL ← FALSE,      --  <debug>
debugPC:    BOOL ← FALSE,      --  <debug>
debugLSC:   BOOL ← FALSE,      --  <debug>
debugABStLim:  BOOL ← FALSE ];     --  <debug>
END.