mirror of
https://github.com/simh/simh.git
synced 2026-01-25 19:56:25 +00:00
B5500: Updates for SCP negative sim_interval.
This commit is contained in:
@@ -2001,6 +2001,7 @@ sim_instr(void)
|
||||
reason = sim_process_event();
|
||||
if (reason != SCPE_OK)
|
||||
break; /* process */
|
||||
sim_interval--;
|
||||
}
|
||||
/* Passed time quantum */
|
||||
if (sim_interval <= 0) { /* event queue? */
|
||||
|
||||
@@ -188,7 +188,7 @@ t_stat dsk_cmd(uint16 cmd, uint16 dev, uint8 chan, uint16 *wc)
|
||||
} else {
|
||||
uptr->CMD |= DK_ADDR;
|
||||
}
|
||||
sim_activate(uptr, 100);
|
||||
sim_activate(uptr, 90);
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
@@ -292,7 +292,7 @@ t_stat dsk_srv(UNIT * uptr)
|
||||
sim_activate(eptr, 8000);
|
||||
return SCPE_OK;
|
||||
}
|
||||
sim_activate(uptr, 100);
|
||||
sim_activate(uptr, 90);
|
||||
}
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user