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

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

12
scp.c
View file

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