github.com/rcornwell.sims
1
0
Fork 0
mirror of https://github.com/rcornwell/sims.git synced 2026-01-13 15:27:04 +00:00
Code Releases Activity

KA10: Fixed bug in ADJBP.

Browse Source
This commit is contained in:
Richard Cornwell 2019-09-27 23:44:33 -04:00
parent 65645bc527
commit ce627981df
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PDP10/ka10_ch10.c
View File

@ -335,8 +335,6 @@ void ch10_command (uint32 data)
t_stat ch10_devio(uint32 dev, uint64 *data)
{
DEVICE *dptr = &imx_dev;
switch(dev & 07) {
case CONO:
sim_debug (DBG_REG, &ch10_dev, "CONO %012llo %012llo \n", *data, ch10_status);

2
PDP10/kx10_cpu.c
View File

@ -5677,7 +5677,7 @@ unasign:
}
FE = 36 - (adjb * SC) - ((36 - FE) % SC); /* New P */
AR = (((uint64)(FE & 077)) << 30) | /* Make new BP */
(AR & 00777777000000LL) | /* S,IX,I */
(AR & PMASK & LMASK) | /* S,IX,I */
((AR + adjw) & RMASK);
}
set_reg(AC, AR);