github.com/rcornwell.sims
1
0
Fork 0
mirror of https://github.com/rcornwell/sims.git synced 2026-04-14 07:49:56 +00:00
Code Releases Activity

KA10: Fix MTY bug.

Browse Source 
Ensure only one of input and output can interrupt at the same time.
This commit is contained in:
Lars Brinkhoff
2021-01-18 19:07:50 +01:00
parent f36d49c87e
commit 96de1e684c
1 changed files with 12 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
PDP10/ka10_mty.c
View File

@@ -171,6 +171,9 @@ static t_stat mty_input_svc (UNIT *uptr)
tmxr_poll_rx (&mty_desc);
if (status & MTY_DONE)
return SCPE_OK;
for (i = 0; i < MTY_LINES; i++) {
/* Round robin scan 32 lines. */
scan = (scan + 1) & 037;
@@ -200,6 +203,9 @@ static t_stat mty_output_svc (UNIT *uptr)
int i, ch;
int32 txdone;
if (status & MTY_DONE)
return SCPE_OK;
for (i = 0; i < MTY_LINES; i++) {
/* Round robin scan 32 lines. */
scan = (scan + 1) & 037;
@@ -232,9 +238,11 @@ static t_stat mty_output_svc (UNIT *uptr)
tmxr_poll_tx (&mty_desc);
/* SIMH will actually schedule this UNIT when output is due
according to the line speed. */
sim_activate_after (uptr, 1000000);
if ((status & MTY_ODONE) == 0) {
/* SIMH will actually schedule this UNIT when output is due
according to the line speed. */
sim_activate_after (uptr, 1000000);
}
return SCPE_OK;
}
@@ -245,7 +253,7 @@ static t_stat mty_reset (DEVICE *dptr)
sim_debug(DEBUG_CMD, &mty_dev, "Reset\n");
if (mty_unit->flags & UNIT_ATT) {
sim_activate (mty_unit, tmxr_poll);
sim_activate (&mty_unit[0], tmxr_poll);
sim_activate_after (&mty_unit[1], 100);
} else {
sim_cancel (&mty_unit[0]);