folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

SCP: Assure that library unit tests are run under reasonable conditions.

Browse source
This commit is contained in:
Mark Pizzolato 2020-08-16 06:40:49 -07:00
parent f64a32d0e8
commit dca1c45e80
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
scp.c
View file

@ -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");