mirror of
https://github.com/simh/simh.git
synced 2026-01-14 07:39:29 +00:00
SCP: Assure that library unit tests are run under reasonable conditions.
This commit is contained in:
parent
f64a32d0e8
commit
dca1c45e80
4
scp.c
4
scp.c
@ -15509,6 +15509,10 @@ int32 saved_switches = sim_switches & ~SWMASK ('T');
|
||||
t_stat stat = SCPE_OK;
|
||||
char gbuf[CBUFSIZE];
|
||||
|
||||
if (sim_time != 0.0)
|
||||
return sim_messagef (SCPE_UNK, "Library tests can not be performed after instructions have been executed.\n");
|
||||
detach_all (0, 0); /* Assure that all units are unattached */
|
||||
|
||||
cptr = get_glyph (cptr, gbuf, 0);
|
||||
if (gbuf[0] == '\0')
|
||||
strcpy (gbuf, "ALL");
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user