
Сообщение от
AlexG
в SV есть фича "интерфейс" - это что типа набора проводов
Код:
entity KL11 is
port
(
busClock : in std_logic
; FromBus : in typeFromBus
; ToBus : out typeToBus
; UartClock : in std_logic
; RXin : in std_logic
; TXout : out std_logic
);
end KL11;
.....
Chasis0: ChasisM
port map
(
FromPDP11ToSlot => PDP11_20_IOPBus.FromBus
, FromSlotToPDP11 => PDP11_20_IOPBus.ToBus
, FromBusToSlot(0) => SysRegs0.FromBus
, FromSlotToBus(0) => SysRegs0.ToBus
, FromBusToSlot(1) => Rom0.FromBus
, FromSlotToBus(1) => Rom0.ToBus
, FromBusToSlot(2) => Rom1.FromBus
, FromSlotToBus(2) => Rom1.ToBus
, FromBusToSlot(3) => Uart0.FromBus
, FromSlotToBus(3) => Uart0.ToBus
, FromBusToSlot(4) => KW11L0.FromBus
, FromSlotToBus(4) => KW11L0.ToBus
, FromBusToSlot(5) => RK0.FromBus
, FromSlotToBus(5) => RK0.ToBus
, FromBusToSlot(6) => RL0.FromBus
, FromSlotToBus(6) => RL0.ToBus
, FromBusToSlot(7) => SwitchesDisplay0.FromBus
, FromSlotToBus(7) => SwitchesDisplay0.ToBus
, FromSlotToMemory => Memory0.ToMemory
, FromMemoryToSlot => Memory0.FromMemory
, FromBusMasterToSlot(0) => PDP11_20_MemoryBus.FromBusMaster
, FromSlotToBusMaster(0) => PDP11_20_MemoryBus.ToBusMaster
, FromBusMasterToSlot(1) => RK0BusMaster22.FromBusMaster
, FromSlotToBusMaster(1) => RK0BusMaster22.ToBusMaster
, FromBusMasterToSlot(2) => RL0BusMaster.FromBusMaster
, FromSlotToBusMaster(2) => RL0BusMaster.ToBusMaster
);
- - - Добавлено - - -
А, да, описание ChasisM
Код:
type arrtypeFromBus is array (natural range <>) of typeFromBus;
entity ChasisM is
port
(
FromPDP11ToSlot : in typeFromBus
; FromSlotToPDP11 : out typeToBus
; FromBusToSlot : out arrtypeFromBus
; FromSlotToBus : in arrtypeToBus
; FromSlotToMemory : out typeFromBusMaster
; FromMemoryToSlot : in typeToBusMaster
; FromBusMasterToSlot : in arrtypeFromBusMaster := zeroFromBusMaster
; FromSlotToBusMaster : out arrtypeToBusMaster
);
end ChasisM;