github.com/simh.simh
1
0
Fork 0
mirror of https://github.com/simh/simh.git synced 2026-01-26 20:12:23 +00:00
Code Releases Activity

simh 3.10-RC2

Browse Source 
3.10 is mostly an attempt to get aligned with the current head of the
GitHub 4.0 sources. While the core libraries and SCP have diverged too
far for real forward and backward compatibility, enough 4.0 workalikes
have been added to allow much closer convergence of the two streams.

3.10 will provide the basis for my future simulation work.
This commit is contained in:
Bob Supnik
2018-07-21 10:39:14 -07:00
committed by Mark Pizzolato
parent a2bc6a9508
commit 5ccef2e6f8
4 changed files with 12 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
scp.c
View File

@@ -3313,9 +3313,11 @@ for (i = 0, j = addr; i < sim_emax; i++, j = j + dptr->aincr) {
else {
if (!(uptr->flags & UNIT_ATT))
return SCPE_UNATT;
if (uptr->flags & UNIT_RAW)
if (((uptr->flags & UNIT_RAW) != 0) ||
(uptr->fileref == NULL))
return SCPE_NOFNC;
if ((uptr->flags & UNIT_FIX) && (j >= uptr->capac)) {
if (((uptr->flags & UNIT_FIX) != 0) &&
(j >= uptr->capac)) {
reason = SCPE_NXM;
break;
}
@@ -4509,7 +4511,7 @@ do {
if (uptr->action != NULL)
reason = uptr->action (uptr);
else reason = SCPE_OK;
} while ((reason == SCPE_OK) && (sim_interval == 0));
} while ((reason == SCPE_OK) && (sim_interval <= 0));
/* Empty queue forces sim_interval != 0 */