From 09109d21863420e4e37758e5a901bf51eb92020c Mon Sep 17 00:00:00 2001 From: Ray Jewhurst Date: Thu, 7 Apr 2016 16:56:08 -0400 Subject: [PATCH] TX-0: Added register descriptions to all devices --- TX-0/tx0_cpu.c | 24 ++++++++++++------------ TX-0/tx0_stddev.c | 42 +++++++++++++++++++++--------------------- 2 files changed, 33 insertions(+), 33 deletions(-) diff --git a/TX-0/tx0_cpu.c b/TX-0/tx0_cpu.c index 93ef7775..e692adef 100644 --- a/TX-0/tx0_cpu.c +++ b/TX-0/tx0_cpu.c @@ -317,21 +317,21 @@ extern int32 dpy (int32 ac); UNIT cpu_unit = { UDATA (NULL, UNIT_FIX | UNIT_BINK | UNIT_EXT_INST | UNIT_MODE_READIN, MAXMEMSIZE) }; REG cpu_reg[] = { - { ORDATA (PC, PC, ASIZE) }, - { ORDATA (AC, AC, 18) }, - { ORDATA (IR, IR, 5) }, - { ORDATA (MAR, MAR, 16) }, - { ORDATA (XR, XR, 14) }, - { ORDATA (MBR, MBR, 18) }, - { ORDATA (LR, LR, 18) }, - { ORDATA (TAC, TAC, 18) }, - { ORDATA (TBR, TBR, 18) }, + { ORDATAD (PC, PC, ASIZE, "program counter") }, + { ORDATAD (AC, AC, 18, "accumulator") }, + { ORDATAD (IR, IR, 5, "instruction register (5 bits in Extented Mode, 2 bits in standard mode)") }, + { ORDATAD (MAR, MAR, 16, "memory address register") }, + { ORDATAD (XR, XR, 14, "index register (Extended Mode only)") }, + { ORDATAD (MBR, MBR, 18, "memory buffer register") }, + { ORDATAD (LR, LR, 18, "live register") }, + { ORDATAD (TAC, TAC, 18, "toggle switch accumulator") }, + { ORDATAD (TBR, TBR, 18, "toggle switch buffer register") }, { ORDATA (PF, PF, 18) }, { BRDATA (PCQ, pcq, 8, ASIZE, PCQ_SIZE), REG_RO+REG_CIRC }, { ORDATA (PCQP, pcq_p, 6), REG_HRO }, - { FLDATA (IOS, ios, 0) }, /* In Out Stop */ - { FLDATA (CH, ch, 0) }, /* Chime Alarm */ - { ORDATA (LP, LPEN, 2) }, /* Light Pen */ + { FLDATAD (IOS, ios, 0, "in out stop") }, /* In Out Stop */ + { FLDATAD (CH, ch, 0, "chime alarm") }, /* Chime Alarm */ + { ORDATAD (LP, LPEN, 2, "light pen") }, /* Light Pen */ { FLDATA (R, mode_rdin, 0), REG_HRO }, /* Mode "R" (Read In) Flip-Flop */ { FLDATA (T, mode_tst, 0), REG_HRO }, /* Mode "T" (Test) Flip-Flop */ { NULL } diff --git a/TX-0/tx0_stddev.c b/TX-0/tx0_stddev.c index ac0f09ac..563ac41e 100644 --- a/TX-0/tx0_stddev.c +++ b/TX-0/tx0_stddev.c @@ -145,16 +145,16 @@ UNIT petr_unit = { }; REG petr_reg[] = { - { ORDATA (BUF, petr_unit.buf, 18) }, - { FLDATA (UC, petr_uc, UC_V) }, - { FLDATA (DONE, iosta, IOS_V_PETR) }, + { ORDATAD (BUF, petr_unit.buf, 18, "18-bit buffer to store up to three lines of paper tape input") }, + { FLDATAD (UC, petr_uc, UC_V, "upper case/lower case state") }, + { FLDATAD (DONE, iosta, IOS_V_PETR, "input ready flag") }, { ORDATA (HOLD, petr_hold, 9), REG_HRO }, { ORDATA (STATE, petr_state, 5), REG_HRO }, { FLDATA (WAIT, petr_wait, 0), REG_HRO }, - { DRDATA (POS, petr_unit.pos, T_ADDR_W), PV_LEFT }, - { DRDATA (TIME, petr_unit.wait, 24), PV_LEFT }, + { DRDATAD (POS, petr_unit.pos, T_ADDR_W, "position in input file"), PV_LEFT }, + { DRDATAD (TIME, petr_unit.wait, 24, "time from I/O initiation to interrupt"), PV_LEFT }, { DRDATA (LEADER, petr_leader, 6), REG_HRO }, - { FLDATA (STOP_IOE, petr_stopioe, 0) }, + { FLDATAD (STOP_IOE, petr_stopioe, 0, "stop on I/O error") }, { NULL } }; @@ -198,11 +198,11 @@ UNIT ptp_unit = { }; REG ptp_reg[] = { - { ORDATA (BUF, ptp_unit.buf, 8) }, - { FLDATA (DONE, iosta, IOS_V_PTP) }, - { DRDATA (POS, ptp_unit.pos, T_ADDR_W), PV_LEFT }, - { DRDATA (TIME, ptp_unit.wait, 24), PV_LEFT }, - { FLDATA (STOP_IOE, ptp_stopioe, 0) }, + { ORDATAD (BUF, ptp_unit.buf, 8, "last data item processed") }, + { FLDATAD (DONE, iosta, IOS_V_PTP, "device done flag") }, + { DRDATAD (POS, ptp_unit.pos, T_ADDR_W, "position in the output file"), PV_LEFT }, + { DRDATAD (TIME, ptp_unit.wait, 24, "time from I/O initiation to interrupt"), PV_LEFT }, + { FLDATAD (STOP_IOE, ptp_stopioe, 0, "stop on I/O error") }, { NULL } }; @@ -229,12 +229,12 @@ DEVICE ptp_dev = { UNIT tti_unit = { UDATA (&tti_svc, 0, 0), KBD_POLL_WAIT }; REG tti_reg[] = { - { ORDATA (BUF, tty_buf, 6) }, - { FLDATA (UC, tty_uc, UC_V) }, + { ORDATAD (BUF, tty_buf, 6, "typewrite buffer (shared)") }, + { FLDATAD (UC, tty_uc, UC_V, "upper case/lower case state (shared)") }, { ORDATA (HOLD, tti_hold, 9), REG_HRO }, - { FLDATA (DONE, iosta, IOS_V_TTI) }, - { DRDATA (POS, tti_unit.pos, T_ADDR_W), PV_LEFT }, - { DRDATA (TIME, tti_unit.wait, 24), REG_NZ + PV_LEFT }, + { FLDATAD (DONE, iosta, IOS_V_TTI, "input ready flag") }, + { DRDATAD (POS, tti_unit.pos, T_ADDR_W, "number of characters input"), PV_LEFT }, + { DRDATAD (TIME, tti_unit.wait, 24, "keyboard polling interval"), REG_NZ + PV_LEFT }, { NULL } }; @@ -261,11 +261,11 @@ DEVICE tti_dev = { UNIT tto_unit = { UDATA (&tto_svc, 0, 0), SERIAL_OUT_WAIT * 10 }; REG tto_reg[] = { - { ORDATA (BUF, tty_buf, 6) }, - { FLDATA (UC, tty_uc, UC_V) }, - { FLDATA (DONE, iosta, IOS_V_TTO) }, - { DRDATA (POS, tto_unit.pos, T_ADDR_W), PV_LEFT }, - { DRDATA (TIME, tto_unit.wait, 24), PV_LEFT }, + { ORDATAD (BUF, tty_buf, 6, "typewrite buffer (shared)") }, + { FLDATAD (UC, tty_uc, UC_V, "upper case/lower case state (shared)") }, + { FLDATAD (DONE, iosta, IOS_V_TTO, "output done flag") }, + { DRDATAD (POS, tto_unit.pos, T_ADDR_W, "number of characters output"), PV_LEFT }, + { DRDATAD (TIME, tto_unit.wait, 24, "time from I/O initiation to interrupt"), PV_LEFT }, { NULL } };