Stop ptp_svc from setting the ios bit; sim_instr never clears it and simulation loops.
The CPU-to-device routines and device service routines need a redesign. In the meantime, this quick patch makes tape punching possible.
This commit is contained in:
parent
0ca09194fa
commit
6474252ed4
1 changed files with 0 additions and 1 deletions
|
@ -524,7 +524,6 @@ int32 ptp (int32 inst, int32 dev, int32 dat)
|
||||||
|
|
||||||
t_stat ptp_svc (UNIT *uptr)
|
t_stat ptp_svc (UNIT *uptr)
|
||||||
{
|
{
|
||||||
ios = 1; /* restart */
|
|
||||||
iosta = iosta | IOS_PTP; /* set flag */
|
iosta = iosta | IOS_PTP; /* set flag */
|
||||||
if ((uptr->flags & UNIT_ATT) == 0) /* not attached? */
|
if ((uptr->flags & UNIT_ATT) == 0) /* not attached? */
|
||||||
return SCPE_UNATT;
|
return SCPE_UNATT;
|
||||||
|
|
Loading…
Add table
Reference in a new issue