mirror of
https://github.com/ibm2030/IBM2030.git
synced 2026-01-11 23:52:47 +00:00
Fix prom_read_pulse output set
This commit is contained in:
parent
7be08121eb
commit
60d1059033
@ -31,9 +31,9 @@
|
|||||||
-- C is the core storage and X is the CCROS unit
|
-- C is the core storage and X is the CCROS unit
|
||||||
--
|
--
|
||||||
-- Revision History:
|
-- Revision History:
|
||||||
-- Revision 1.0 2010-07-20
|
-- Revision 1.0 2010-07-20 Initial Release
|
||||||
-- Revision 1.1 2012-03-06 Modified to parse PCH files from Hercules (ESD/TXT/TXT/TXT/RLD/RLD/END)
|
-- Revision 1.1 2012-03-06 Modified to parse PCH files from Hercules (ESD/TXT/TXT/TXT/RLD/RLD/END)
|
||||||
-- Initial Release
|
--
|
||||||
library IEEE;
|
library IEEE;
|
||||||
use IEEE.STD_LOGIC_1164.ALL;
|
use IEEE.STD_LOGIC_1164.ALL;
|
||||||
use IEEE.STD_LOGIC_ARITH.ALL;
|
use IEEE.STD_LOGIC_ARITH.ALL;
|
||||||
@ -206,7 +206,7 @@ begin
|
|||||||
state <= wait_for_high_address_byte;
|
state <= wait_for_high_address_byte;
|
||||||
end if;
|
end if;
|
||||||
when got_high_address_byte =>
|
when got_high_address_byte =>
|
||||||
prom_read_pulse <= '0';
|
-- prom_read_pulse <= '0';
|
||||||
state <= wait_for_low_address_byte;
|
state <= wait_for_low_address_byte;
|
||||||
when wait_for_low_address_byte =>
|
when wait_for_low_address_byte =>
|
||||||
-- Wait until we get the low address byte
|
-- Wait until we get the low address byte
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user