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

SCP: Handle ON processing for stdin supplied commands

Browse source 
Additionally, allow STEP to have ON actions
This commit is contained in:
Mark Pizzolato 2020-11-18 15:17:04 -08:00
parent 8233fdc3c1
commit 93bff5ea05
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
scp.c
View file

@ -2996,6 +2996,13 @@ while (stat != SCPE_EXIT) { /* in case exit */
if (stat >= SCPE_BASE) /* error? */ if (stat >= SCPE_BASE) /* error? */
sim_printf ("%s\n", sim_error_text (stat)); sim_printf ("%s\n", sim_error_text (stat));
} }
if ((sim_on_check[sim_do_depth]) &&
(stat != SCPE_OK)) {
if ((stat <= SCPE_MAX_ERR) && sim_on_actions[sim_do_depth][stat])
sim_brk_setact (sim_on_actions[sim_do_depth][stat]);
else
sim_brk_setact (sim_on_actions[sim_do_depth][0]);
}
if (sim_vm_post != NULL) if (sim_vm_post != NULL)
(*sim_vm_post) (TRUE); (*sim_vm_post) (TRUE);
} /* end while */ } /* end while */
@ -4007,8 +4014,7 @@ do {
stat = SCPE_OK; /* so adjust it to SCPE_OK */ stat = SCPE_OK; /* so adjust it to SCPE_OK */
if (staying && if (staying &&
(sim_on_check[sim_do_depth]) && (sim_on_check[sim_do_depth]) &&
(stat != SCPE_OK) && (stat != SCPE_OK)) {
(stat != SCPE_STEP)) {
if ((stat <= SCPE_MAX_ERR) && sim_on_actions[sim_do_depth][stat]) if ((stat <= SCPE_MAX_ERR) && sim_on_actions[sim_do_depth][stat])
sim_brk_setact (sim_on_actions[sim_do_depth][stat]); sim_brk_setact (sim_on_actions[sim_do_depth][stat]);
else else