diff --git a/I7000/i7090_cpu.c b/I7000/i7090_cpu.c index 7774da1..28a7f47 100644 --- a/I7000/i7090_cpu.c +++ b/I7000/i7090_cpu.c @@ -4198,36 +4198,6 @@ rtc_srv(UNIT * uptr) M[5] += 1; if (M[5] & MSIGN) interval_irq = 1; -#if 0 - static uint32 last_ms = 0; - static int milli_time = 0; - static time_t last_sec = 0; - if (cpu_unit.flags & OPTION_TIMER) { - int ms = sim_os_msec(); - uint32 diff = ms - last_ms; - time_t nt; - - time(&nt); - if (nt != last_sec) { - milli_time = 0; - last_sec = nt; - } - while (diff > 16) { - /* Stop updating it over 60 in this second */ - if (milli_time > 60) { - last_ms = ms; - diff = 0; - break; - } - M[5] += 1; - if (M[5] & MSIGN) - interval_irq = 1; - diff -= 16; - last_ms = ms; - milli_time += 1; - } - sim_activate(&cpu_unit, 10000); -#endif } return SCPE_OK; } diff --git a/I7000/i7090_lpr.c b/I7000/i7090_lpr.c index e666d60..7a6271d 100644 --- a/I7000/i7090_lpr.c +++ b/I7000/i7090_lpr.c @@ -290,7 +290,7 @@ print_line(UNIT * uptr, int chan, int unit) } if (outsel & PRINT_1) { - while (uptr->u4 < uptr->capac) { + while (uptr->u4 < (uint32)uptr->capac) { if (uptr->flags & UNIT_ATT) sim_fwrite("\n\r", 1, 2, uptr->fileref); if (uptr->flags & ECHO) { @@ -301,8 +301,8 @@ print_line(UNIT * uptr, int chan, int unit) } } - if (uptr->u4 >= uptr->capac) { - uptr->u4 -= uptr->capac; + if (uptr->u4 >= (uint32)uptr->capac) { + uptr->u4 -= (uint32)uptr->capac; dev_pulse[chan] |= PRINT_I; }