6502/AtomBusMon
1
0
Fork 0
mirror of https://github.com/hoglet67/AtomBusMon.git synced 2024-06-09 04:29:28 +00:00
Code Issues Projects Releases Wiki Activity

z80: fix a T80 build error on Spartan 3

Browse Source 
Change-Id: I6fca1eea44e1cc8e244d3d892ee25e0b7fea9eac
This commit is contained in:
David Banks 2019-10-15 16:28:55 +01:00
parent f710f7a20f
commit ddaa266c12
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/T80/T80.vhd
View File

@ -734,7 +734,7 @@ begin
F(Flag_N) <= DI_Reg(7);
F(Flag_C) <= ioq(8);
F(Flag_H) <= ioq(8);
ioq := (ioq and x"7") xor ('0'&BusA);
ioq := (ioq and ('0'&x"07")) xor ('0'&BusA);
F(Flag_P) <= not (ioq(0) xor ioq(1) xor ioq(2) xor ioq(3) xor ioq(4) xor ioq(5) xor ioq(6) xor ioq(7));
end if;