folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

KA10: Better fix to RH10/20 for Tops20.

Browse source
This commit is contained in:
Richard Cornwell 2020-11-19 21:20:30 -05:00
parent 435eb0e599
commit 983b3ae278
1 changed files with 1 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
PDP10/kx10_rh.c
View file

@ -183,7 +183,7 @@ t_stat rh_devio(uint32 dev, uint64 *data) {
DEVICE *dptr = NULL; DEVICE *dptr = NULL;
struct rh_if *rhc = NULL; struct rh_if *rhc = NULL;
int drive; int drive;
uint32 drdat; uint32 drdat = 0;
for (drive = 0; rh[drive].dev_num != 0; drive++) { for (drive = 0; rh[drive].dev_num != 0; drive++) {
if (rh[drive].dev_num == (dev & 0774)) { if (rh[drive].dev_num == (dev & 0774)) {
@ -243,7 +243,6 @@ t_stat rh_devio(uint32 dev, uint64 *data) {
} }
if (rhc->reg < 040) { if (rhc->reg < 040) {
int parity; int parity;
drdat = 0;
if (rhc->dev_read(dptr, rhc, rhc->reg, &drdat)) if (rhc->dev_read(dptr, rhc, rhc->reg, &drdat))
rhc->status |= RH20_DR_RESP; rhc->status |= RH20_DR_RESP;
*data = (uint64)(drdat & 0177777); *data = (uint64)(drdat & 0177777);
@ -402,7 +401,6 @@ t_stat rh_devio(uint32 dev, uint64 *data) {
*data = (uint64)(rhc->rae); *data = (uint64)(rhc->rae);
} else if ((rhc->reg & 040) == 0) { } else if ((rhc->reg & 040) == 0) {
int parity; int parity;
drdat = 0;
if (rhc->dev_read(dptr, rhc, rhc->reg, &drdat)) { if (rhc->dev_read(dptr, rhc, rhc->reg, &drdat)) {
rhc->rae |= 1 << rhc->drive; rhc->rae |= 1 << rhc->drive;
rhc->status |= CR_DRE; rhc->status |= CR_DRE;