KA10: Fixed bug in POP instruction on KL10B.
This commit is contained in:
parent
16cafb3525
commit
15d933dd8b
2 changed files with 4 additions and 1 deletions
|
@ -7800,14 +7800,15 @@ jrstf:
|
|||
sect = prev_sect;
|
||||
if (sect != 0 && (AR & SMASK) == 0 && (AR & SECTM) != 0) {
|
||||
AR = (AR - 1) & FMASK;
|
||||
set_reg(AC, AR & FMASK);
|
||||
break;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
#if PDP6 | KL
|
||||
/* This has to before the check for KL10 B extended check */
|
||||
i_flags |= SAC;
|
||||
AR = SOB(AR);
|
||||
set_reg(AC, AR & FMASK);
|
||||
#endif
|
||||
if ((AR & C1) == 0) {
|
||||
#if KI | KL
|
||||
|
|
|
@ -505,6 +505,8 @@ rh_devirq(uint32 dev, t_addr addr) {
|
|||
addr = RSIGN | rhc->ivect;
|
||||
else if (rhc->imode == 2) /* RH20 style */
|
||||
addr = rhc->ivect;
|
||||
} else {
|
||||
sim_printf("Unable to find device %03o\n\r", dev);
|
||||
}
|
||||
return addr;
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue