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

SCP: Fix SET VERIFY which didn't work while processing command procedures

Browse source
This commit is contained in:
Mark Pizzolato 2014-05-16 05:49:42 -07:00
parent fc2f3675fc
commit f4771affe7
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
scp.c
View file

@ -2454,7 +2454,7 @@ if (label) {
cmdp = find_cmd (gbuf); /* return the errorStage things to the stat will be returned */ cmdp = find_cmd (gbuf); /* return the errorStage things to the stat will be returned */
goto Cleanup_Return; goto Cleanup_Return;
} }
} }
if (errabort) /* -e flag? */ if (errabort) /* -e flag? */
set_on (1, NULL); /* equivalent to ON ERROR RETURN */ set_on (1, NULL); /* equivalent to ON ERROR RETURN */
@ -2498,6 +2498,7 @@ do {
stat = cmdp->action (cmdp->arg, cptr); /* exec other cmd */ stat = cmdp->action (cmdp->arg, cptr); /* exec other cmd */
} }
else stat = SCPE_UNK; /* bad cmd given */ else stat = SCPE_UNK; /* bad cmd given */
echo = sim_do_echo; /* Allow for SET VERIFY */
stat_nomessage = stat & SCPE_NOMESSAGE; /* extract possible message supression flag */ stat_nomessage = stat & SCPE_NOMESSAGE; /* extract possible message supression flag */
stat_nomessage = stat_nomessage || (!sim_show_message);/* Apply global suppression */ stat_nomessage = stat_nomessage || (!sim_show_message);/* Apply global suppression */
stat = SCPE_BARE_STATUS(stat); /* remove possible flag */ stat = SCPE_BARE_STATUS(stat); /* remove possible flag */