diff --git a/PDP10/ka10_cpu.c b/PDP10/ka10_cpu.c index 6cdffdd..92062b5 100644 --- a/PDP10/ka10_cpu.c +++ b/PDP10/ka10_cpu.c @@ -4100,9 +4100,10 @@ return SCPE_OK; /* Memory size change */ -t_stat cpu_set_size (UNIT *uptr, int32 val, CONST char *cptr, void *desc) +t_stat cpu_set_size (UNIT *uptr, int32 sval, CONST char *cptr, void *desc) { uint32 i; +uint32 val = (uint32)sval; if ((val <= 0) || ((val * 16 * 1024) > MAXMEMSIZE)) return SCPE_ARG; diff --git a/PDP10/ka10_cty.c b/PDP10/ka10_cty.c index 5b3f0c2..d1b0f8b 100644 --- a/PDP10/ka10_cty.c +++ b/PDP10/ka10_cty.c @@ -162,7 +162,8 @@ t_stat cty_reset (DEVICE *dptr) cty_unit[0].u3 &= ~(TEL_RDY | TEL_BSY); cty_unit[1].u3 &= ~(KEY_RDY | KEY_BSY); clr_interrupt(CTY_DEVNUM); - sim_activate (&cty_unit[1], KBD_WAIT (cty_unit[1].wait, tmxr_poll)); + sim_clock_coschedule (&cty_unit[1], tmxr_poll); + return SCPE_OK; } diff --git a/PDP10/ka10_dt.c b/PDP10/ka10_dt.c index 2f32cf1..865e755 100644 --- a/PDP10/ka10_dt.c +++ b/PDP10/ka10_dt.c @@ -1036,7 +1036,7 @@ dt_boot(int32 unit_num, DEVICE * dptr) t_stat dt_reset (DEVICE *dptr) { - dtsa = dtsb = 0; /* clear status */ + dtsb = dtsa = 0; /* clear status */ clr_interrupt(DT_DEVNUM); clr_interrupt(DT_DEVNUM|4); return SCPE_OK; diff --git a/PDP10/ka10_mt.c b/PDP10/ka10_mt.c index 16ea501..77f516f 100644 --- a/PDP10/ka10_mt.c +++ b/PDP10/ka10_mt.c @@ -830,7 +830,7 @@ mt_boot(int32 unit_num, DEVICE * dptr) M[addr] = mt_df10.buf; /* If not at end of record and TMA continue record read */ - if ((uptr->u6 < uptr->hwmark) && (dptr->flags & MTDF_TYPEB) == 0) { + if (((uint32)uptr->u6 < uptr->hwmark) && (dptr->flags & MTDF_TYPEB) == 0) { uptr->u3 |= MT_MOTION|MT_BUSY; uptr->u3 &= ~(MT_BRFUL|MT_BUFFUL); sim_activate(uptr, 300); diff --git a/PDP10/ka10_rs.c b/PDP10/ka10_rs.c index ff0fc2e..ca6331b 100644 --- a/PDP10/ka10_rs.c +++ b/PDP10/ka10_rs.c @@ -600,7 +600,7 @@ t_stat rs_svc (UNIT *uptr) int unit; DEVICE *dptr; struct df10 *df; - int diff, da; + int da; t_stat r; /* Find dptr, and df10 */ diff --git a/PDP10/ka10_tu.c b/PDP10/ka10_tu.c index 9b62aa8..043c713 100644 --- a/PDP10/ka10_tu.c +++ b/PDP10/ka10_tu.c @@ -1027,7 +1027,6 @@ tu_boot(int32 unit_num, DEVICE * dptr) t_mtrlnt reclen; t_stat r; uint32 addr; - uint32 ptr; int wc; if ((uptr->flags & UNIT_ATT) == 0)