From 264ca2ef6ba4aa95ef0fe7354fe27056c942fa78 Mon Sep 17 00:00:00 2001 From: Richard Cornwell Date: Tue, 21 Jun 2022 09:48:47 -0400 Subject: [PATCH] KA10: IMP Code support for Tenex. --- PDP10/kx10_imp.c | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/PDP10/kx10_imp.c b/PDP10/kx10_imp.c index a421f84b..cc95983e 100644 --- a/PDP10/kx10_imp.c +++ b/PDP10/kx10_imp.c @@ -28,8 +28,9 @@ #include "sim_ether.h" #if NUM_DEVS_IMP > 0 -#define IMP_DEVNUM 0460 -#define WA_IMP_DEVNUM 0400 +#define IMP_DEVNUM 0460 +#define BBN_IMP_DEVNUM 0550 +#define WA_IMP_DEVNUM 0400 #define DEVNUM imp_dib.dev_num @@ -900,7 +901,6 @@ t_stat imp_devio(uint32 dev, uint64 *data) check_interrupts(uptr); break; case TYPE_BBN: - break; case TYPE_WAITS: if (*data & IMP_ODPIEN) { imp_data.pia &= ~07; @@ -952,7 +952,6 @@ t_stat imp_devio(uint32 dev, uint64 *data) *data = (uint64)(uptr->STATUS | (imp_data.pia & 07)); break; case TYPE_BBN: - break; case TYPE_WAITS: *data = (uint64)(imp_data.pia & 0777); if (uptr->STATUS & IMPOD) @@ -3132,9 +3131,11 @@ t_stat imp_attach(UNIT* uptr, CONST char* cptr) /* Set to correct device number */ switch(GET_DTYPE(imp_unit[0].flags)) { case TYPE_MIT: - case TYPE_BBN: imp_dib.dev_num = IMP_DEVNUM; break; + case TYPE_BBN: + imp_dib.dev_num = BBN_IMP_DEVNUM; + break; case TYPE_WAITS: imp_dib.dev_num = WA_IMP_DEVNUM; break;