mirror of
https://github.com/simh/simh.git
synced 2026-01-13 15:27:14 +00:00
SCP: Issue reason message before calling abort when sim_cancel fails
This commit is contained in:
parent
7bd58c6d7f
commit
fdca6384f2
5
scp.c
5
scp.c
@ -8654,10 +8654,9 @@ if (sim_clock_queue != QUEUE_LIST_END)
|
||||
sim_interval = sim_clock_queue->time;
|
||||
else sim_interval = noqueue_time = NOQUEUE_WAIT;
|
||||
if (uptr->next) {
|
||||
if (sim_deb) {
|
||||
sim_debug (SIM_DBG_EVENT, sim_dflt_dev, "Cancel failed for %s\n", sim_uname(uptr));
|
||||
sim_printf ("Cancel failed for %s\n", sim_uname(uptr));
|
||||
if (sim_deb)
|
||||
fclose(sim_deb);
|
||||
}
|
||||
abort ();
|
||||
}
|
||||
return SCPE_OK;
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user