IFUSrc:
CEDAR
DEFINITIONS =
BEGIN
ROPE: TYPE = Core.ROPE;
ifuContext: CoreName.Context;
Rollback: SIGNAL[name: ROPE];
DriverModuleProc:
TYPE =
PROC [sIn:
ROPE, altOut:
ROPE ←
NIL]
RETURNS [cellType: Core.CellType, sOut: ROPE];
Complete: PROC RETURNS [cellType: Core.CellType];
PadTop: PROC RETURNS [cellType: Core.CellType];
PadHeart: PROC RETURNS [cellType: Core.CellType];
PadBot: PROC RETURNS [cellType: Core.CellType];
PadLt: PROC RETURNS [cellType: Core.CellType];
Heart: PROC RETURNS [cellType: Core.CellType];
PadRt: PROC RETURNS [cellType: Core.CellType];
LeftColumn: PROC RETURNS [cellType: Core.CellType];
DataColumn: PROC RETURNS [cellType: Core.CellType];
RightColumn: PROC RETURNS [cellType: Core.CellType];
FetchIndexing: PROC RETURNS [cellType: Core.CellType];
FetchControler: DriverModuleProc;
LtDrPadIO: DriverModuleProc;
StackControler: DriverModuleProc;
Interlock: DriverModuleProc;
MainPipeControl: DriverModuleProc;
StackIndexing: PROC RETURNS [cellType: Core.CellType];
InstrDecode: DriverModuleProc;
RtDrPadIO: DriverModuleProc;
Fetch: PROC RETURNS [cellType: Core.CellType];
FetchBuf: PROC RETURNS [cellType: Core.CellType];
XaForm: PROC RETURNS [cellType: Core.CellType];
PCFormTop: PROC RETURNS [cellType: Core.CellType];
PCFormBot: PROC RETURNS [cellType: Core.CellType];
StackBuf: PROC RETURNS [cellType: Core.CellType];
LSForm: PROC RETURNS [cellType: Core.CellType];
ABForm: PROC RETURNS [cellType: Core.CellType];
ControlPipe: PROC RETURNS [cellType: Core.CellType];
ProcRegToList: PROC [reg: DragOpsCross.ProcessorRegister] RETURNS[LIST OF REF];
CardToList: PROC [val, size: CARDINAL] RETURNS[new: LIST OF REF];
dShIn: ROPE;
dShLeftOut: ROPE;
dShRightOut: ROPE;
dShOut: ROPE;
END.