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

SCP: Assure that internal library test exits with any failing status

Browse source
This commit is contained in:
Mark Pizzolato 2019-02-01 07:38:04 -08:00
parent f7a17cae15
commit 0869cef132
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
scp.c
View file

@ -14473,24 +14473,28 @@ DEVICE *dptr;
t_stat stat = SCPE_OK;
for (i = 0; (dptr = sim_devices[i]) != NULL; i++) {
t_stat tstat = SCPE_OK;
switch (DEV_TYPE(dptr)) {
#if defined(USE_SIM_CARD)
case DEV_CARD:
stat = sim_card_test (dptr);
tstat = sim_card_test (dptr);
break;
#endif
case DEV_DISK:
stat = sim_disk_test (dptr);
tstat = sim_disk_test (dptr);
break;
case DEV_ETHER:
stat = sim_ether_test (dptr);
tstat = sim_ether_test (dptr);
break;
case DEV_TAPE:
stat = sim_tape_test (dptr);
tstat = sim_tape_test (dptr);
break;
default:
break;
}
if (tstat != SCPE_OK)
stat = tstat;
}
return stat;
}