github.com/simh.simh
1
0
Fork 0
mirror of https://github.com/simh/simh.git synced 2026-01-25 19:56:25 +00:00
Code Releases Activity

SCP: Allow "STEP -T nnn" to work

Browse Source 
Delay scheduling of long duration calibration events until a calibrated timer
is established.
This commit is contained in:
Mark Pizzolato
2018-10-05 20:43:43 -07:00
parent 7984074f5f
commit b38cc8a367
2 changed files with 17 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
sim_timer.c
View File

@@ -2562,7 +2562,12 @@ if (usec_delay < 0.0) {
sim_debug (DBG_QUE, &sim_timer_dev, "sim_timer_activate_after(%s, %.0f usecs) - surprising usec value\n",
sim_uname(uptr), usec_delay);
}
uptr->usecs_remaining = 0.0;
if ((sim_is_running) || (tmr <= SIM_NTIMERS))
uptr->usecs_remaining = 0.0;
else { /* defer non timer wallclock activations until a calibrated timer is in effect */
uptr->usecs_remaining = usec_delay;
usec_delay = 0;
}
/*
* Handle long delays by aligning with the calibrated timer's calibration
* activities. Delays which would expire prior to the next calibration
@@ -2577,6 +2582,8 @@ inst_delay_d = floor(inst_per_usec * usec_delay);
inst_delay = (int32)inst_delay_d;
if ((inst_delay == 0) && (usec_delay != 0))
inst_delay_d = inst_delay = 1; /* Minimum non-zero delay is 1 instruction */
if (uptr->usecs_remaining != 0.0) /* No calibrated timer yet, wait one cycle */
inst_delay_d = inst_delay = 1; /* Minimum non-zero delay is 1 instruction */
if ((sim_calb_tmr != -1) && (rtc_hz[sim_calb_tmr])) { /* Calibrated Timer available? */
int32 inst_til_tick = sim_activate_time (&sim_timer_units[sim_calb_tmr]) - 1;
int32 ticks_til_calib = rtc_hz[sim_calb_tmr] - rtc_ticks[sim_calb_tmr];