ProcessorModel.mesa
Written By: Jean Vuillemin and Pradeep Sindhu
Last Edited By: Pradeep Sindhu August 21, 1985 7:14:45 pm PDT
DIRECTORY
DM,
DragOpsCross USING [Word],
PBusModel;
ProcessorModel: CEDAR DEFINITIONS = BEGIN
Basic Types
Word: TYPE = DragOpsCross.Word;
Processor Related Types
ProcessorCommand: TYPE = REF ProcessorCommandRec;
ProcessorCommandRec: TYPE = RECORD [
cmd: PBusModel.PCmdType,
adrs: Word,
data: Word
];
ProcessorSpecific: TYPE = REF ProcessorSpecificRec;
ProcessorSpecificRec: TYPE = RECORD [
commandList: LIST OF ProcessorCommand ← NIL,
pbus: DM.Component ← NIL
];
The processor procedures
Create: PUBLIC PROC [commandList: LIST OF ProcessorCommand ← NIL, pbus: DM.Component] RETURNS [processor: DM.Component];
END.