DIRECTORY DM; DMPBusModel: CEDAR DEFINITIONS = BEGIN PBusSpecific: TYPE = REF PBusSpecificRec; PBusSpecificRec: TYPE = RECORD [ pCmdA: PCmdType _ NoOp, pData: DM.Word _ DM.ZerosWord, pRejectB: BOOL _ FALSE, pFaultB: FaultType ]; PCmdType: TYPE = {NoOp, Fetch, Store}; FaultType: TYPE = {None, PageFault, WriteProtectFault, FPFault}; Create: PUBLIC PROC [] RETURNS [pbus: DM.Component]; Cmd: PUBLIC PROC [pbus: DM.Component] RETURNS [PCmdType]; DrCmd: PUBLIC PROC [pbus: DM.Component, pCmdA: PCmdType]; Data: PUBLIC PROC [pbus: DM.Component] RETURNS [DM.Word]; DrData: PUBLIC PROC [pbus: DM.Component, pData: DM.Word]; Reject: PUBLIC PROC [pbus: DM.Component] RETURNS [BOOL]; DrReject: PUBLIC PROC [pbus: DM.Component, pRejectB: BOOL]; END. °DMPBusModel.mesa Written By: Jean Vuillemin and Pradeep Sindhu Last Edited By: Pradeep Sindhu August 29, 1985 4:51:35 pm PDT PBus Related Types The PBus procedures Κ†˜™J™-J™=—J™J™codešΟk ˜ Kšœ˜—K˜šΟb œœ œ˜&K˜šœ™K™Kšž œœœ˜)šžœœ˜ K–36 sp tabStopsšœ˜K–36 sp tabStopsšœœœ ˜K–36 sp tabStopsšœ œœ˜K–36 sp tabStops˜K–36 sp tabStops˜—K˜Kšž žœ˜&Kšž œœ1˜@K˜K–36 sp tabStops˜—–36 sp tabStops™K˜K•StartOfExpansionS -- [cache: CacheModels.Cache, addr: DragOpsCross.Word, fromJump: BOOL _ FALSE] -- š Οnœœœœœ ˜4Kš Ÿœœœœ œ ˜9KšŸœœœœ˜9Kš Ÿœœœœ œœ˜9Kš Ÿœœœœœ˜9Kš Ÿœœœœ œœ˜8š Ÿœœœœœ˜;K˜——Kšœ˜K˜K˜—J™J™—…—ξ$