<> <> <> <<>> DIRECTORY DM, DMPBusModel; DMProcessorModel: CEDAR DEFINITIONS = BEGIN <> ProcessorCommand: TYPE = REF ProcessorCommandRec; ProcessorCommandRec: TYPE = RECORD [ cmd: DMPBusModel.PCmdType, adrs: DM.Word, data: DM.Word ]; ProcessorSpecific: TYPE = REF ProcessorSpecificRec; ProcessorSpecificRec: TYPE = RECORD [ commandList: LIST OF ProcessorCommand _ NIL, pbus: DM.Component _ NIL ]; <> Create: PUBLIC PROC [commandList: LIST OF ProcessorCommand _ NIL, pbus: DM.Component] RETURNS [processor: DM.Component]; EmptyCommandList: PUBLIC SIGNAL []; END. <<>>