1
0
mirror of https://github.com/simh/simh.git synced 2026-04-27 20:38:04 +00:00

KA10: Regular update. Code cleanup and minor enhancements.

This commit is contained in:
Richard Cornwell
2019-11-03 22:11:23 -05:00
parent bbfa391924
commit 178968a621
16 changed files with 1130 additions and 406 deletions

View File

@@ -54,7 +54,7 @@
static int pia = 0;
static int status = 0;
t_value auxcpu_base = 03000000;
int auxcpu_base = 03000000;
static t_stat auxcpu_devio(uint32 dev, t_uint64 *data);
static t_stat auxcpu_svc (UNIT *uptr);
@@ -187,7 +187,7 @@ static t_stat auxcpu_svc (UNIT *uptr)
auxcpu_ldsc.rcve = 1;
uptr->wait = AUXCPU_POLL;
}
sim_activate (uptr, uptr->wait);
sim_clock_coschedule (uptr, uptr->wait);
return SCPE_OK;
}
@@ -407,13 +407,13 @@ static t_stat auxcpu_set_base (UNIT *uptr, int32 val, CONST char *cptr, void *de
if (r != SCPE_OK)
return SCPE_ARG;
auxcpu_base = x;
auxcpu_base = (int)x;
return SCPE_OK;
}
static t_stat auxcpu_show_base (FILE *st, UNIT *uptr, int32 val, CONST void *desc)
{
fprintf (st, "Base: %llo", auxcpu_base);
fprintf (st, "Base: %06o", auxcpu_base);
return SCPE_OK;
}
#endif