EUPLA.mesa
Copyright © 1984 by Xerox Corporation. All rights reserved.
Last edited by Curry, April 10, 1985 1:53:53 pm PST
DIRECTORY Dragon, PW;
EUPLA: CEDAR DEFINITIONS =
BEGIN
MainControlIn: TYPE = RECORD [ -- default zero
kIsRtOp:    BOOL       ← FALSE,
aluOp:    Dragon.ALUOps    ← Or,
condSel:    Dragon.CondSelects   ← False,
aluLt:     Dragon.ALULeftSources ← aBus,
aluRt:     Dragon.ALURightSources ← bBus,
st2A:     Dragon.Store2ASources  ← bBus,
st3AIsCbus:   BOOL ← FALSE,
res3AIsCbus:   BOOL ← FALSE,
res3BIsRdData:  BOOL ← FALSE ];
MainControlOut: TYPE = RECORD [ -- default zero
doThis:   BOOL ← FALSE,
doThisToo:  BOOL ← FALSE,
doThat:   BOOL ← FALSE,
andThat:   BOOL ← FALSE ];
END.