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

SCP: Restore -D option for TESTLIB command

Browse source 
Adding the automatic detach_all ended up always clearing the switches.
This commit is contained in:
Mark Pizzolato 2020-08-21 12:31:30 -07:00
parent 9a73eb9d9d
commit 76bf686648
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,9 +15509,13 @@ int32 saved_switches = sim_switches & ~SWMASK ('T');
t_stat stat = SCPE_OK; t_stat stat = SCPE_OK;
char gbuf[CBUFSIZE]; char gbuf[CBUFSIZE];
GET_SWITCHES (cptr); /* get switches */
saved_switches |= sim_switches;
if (sim_time != 0.0) if (sim_time != 0.0)
return sim_messagef (SCPE_UNK, "Library tests can not be performed after instructions have been executed.\n"); return sim_messagef (SCPE_UNK, "Library tests can not be performed after instructions have been executed.\n");
sim_switches = 0;
detach_all (0, 0); /* Assure that all units are unattached */ detach_all (0, 0); /* Assure that all units are unattached */
sim_switches = saved_switches;
cptr = get_glyph (cptr, gbuf, 0); cptr = get_glyph (cptr, gbuf, 0);
if (gbuf[0] == '\0') if (gbuf[0] == '\0')