From 5330756065ae6fca99dd6f03fac2e599a7a9b80f Mon Sep 17 00:00:00 2001 From: Richard Cornwell Date: Sat, 24 Feb 2018 16:12:47 -0500 Subject: [PATCH] KA10: Fixed issue with quatum clock on ITS when simulator stopped. --- PDP10/ka10_cpu.c | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) diff --git a/PDP10/ka10_cpu.c b/PDP10/ka10_cpu.c index 8339c58..62cd787 100644 --- a/PDP10/ka10_cpu.c +++ b/PDP10/ka10_cpu.c @@ -1925,22 +1925,24 @@ if ((reason = build_dev_tab ()) != SCPE_OK) /* build, chk dib_tab */ one_p_arm = 0; #endif #if ITS - if (QITS) + if (QITS) { sim_activate(&cpu_unit[1], 10000); + qua_time = 0; + } #endif while ( reason == 0) { /* loop until ABORT */ - if (sim_interval <= 0) { /* check clock queue */ - if ((reason = sim_process_event()) != SCPE_OK) {/* error? stop sim */ + if (sim_interval <= 0) { /* check clock queue */ + if ((reason = sim_process_event()) != SCPE_OK) {/* error? stop sim */ #if ITS - if (QITS) - sim_cancel(&cpu_unit[1]); + if (QITS) + sim_cancel(&cpu_unit[1]); #endif - return reason; - } - } + return reason; + } + } - if (sim_brk_summ && f_load_pc && sim_brk_test(PC, SWMASK('E'))) { + if (sim_brk_summ && f_load_pc && sim_brk_test(PC, SWMASK('E'))) { reason = STOP_IBKPT; break; }