github.com/open-simh.simh
1
0
Fork 0
mirror of https://github.com/open-simh/simh.git synced 2026-03-05 11:04:49 +00:00
Code Issues Projects Releases Wiki Activity

SDS: Reset CR DEVICE cr_eor on disconnect. Caused algol compiler to hang.

Browse Source
This commit is contained in:
ken rector
2023-03-11 08:06:46 -08:00
committed by Paul Koning
parent cf9fac614c
commit f1811c49bd
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
SDS/sds_cr.c
View File

@@ -24,6 +24,7 @@
in this Software without prior written authorization from Ken Rector.
03-Mar-20 kenr Initial Version
10-Mar-23 kenr Reset cr_eor on disconnect
*/
@@ -220,6 +221,8 @@ t_stat cr_devio (uint32 fnc, uint32 inst, uint32 *dat) {
case IO_DISC: /* disconnect */
xfr_req = xfr_req & ~XFR_CR; /* clr xfr flag */
sim_cancel (uptr); /* deactivate unit */
cr_eor = 0;
uptr->STATUS = 0;
break;
case IO_SKS: /* SKS */
new_ch = I_GETSKCH (inst); /* get chan # */