word9 262 src/dps8/dps8.h # define GETBYTE(src, pos) (word9)(((word36)src >> (word36)((3 - pos) * 9)) & 0777) word9 1490 src/dps8/dps8_console.c word9 3988 src/dps8/dps8_cpu.c void add_dps8m_DU_OU_history (word36 flags, word18 ICT, word9 RS_REG, word9 flags2) word9 3997 src/dps8/dps8_cpu.c void add_dps8m_APU_history (word15 ESN, word21 flags, word24 RMA, word3 RTRR, word9 flags2) word9 186 src/dps8/dps8_cpu.h word9 BASE; // Contains the 9 high-order bits of an 18-bit address word9 189 src/dps8/dps8_cpu.h word9 BOUND; // Contains the 9 high-order bits of the unrelocated word9 445 src/dps8/dps8_cpu.h word9 OPCODE; // 0 OPCODE 18 - 26 word9 610 src/dps8/dps8_cpu.h word9 editInsertionTable [8]; // 8 9-bit chars word9 615 src/dps8/dps8_cpu.h word9 inBuffer [64]; // decimal unit input buffer word9 616 src/dps8/dps8_cpu.h word9 *in; // pointer to current read position in inBuffer word9 618 src/dps8/dps8_cpu.h word9 outBuffer [64]; // output buffer word9 619 src/dps8/dps8_cpu.h word9 *out; // pointer to current write position in outBuffer; word9 781 src/dps8/dps8_cpu.h word9 cycle; word9 786 src/dps8/dps8_cpu.h word9 RS; word9 2373 src/dps8/dps8_cpu.h void add_dps8m_DUOU_history (word36 flags, word18 ICT, word9 RS_REG, word9 flags2); word9 2374 src/dps8/dps8_cpu.h void add_dps8m_APU_history (word15 ESN, word21 flags, word24 RMA, word3 RTRR, word9 flags2); word9 97 src/dps8/dps8_decimal.c decNumber * decBCD9ToNumber(const word9 *bcd, Int length, const Int scale, decNumber *dn) word9 99 src/dps8/dps8_decimal.c const word9 *last=bcd+length-1; // -> last byte word9 100 src/dps8/dps8_decimal.c const word9 *first; // -> first non-zero byte word9 48 src/dps8/dps8_decimal.h decNumber * decBCD9ToNumber(const word9 *bcd, Int length, const Int scale, decNumber *dn); word9 1158 src/dps8/dps8_disk.c for (word9 dev_num = 0; dev_num < N_DEV_CODES; dev_num ++) word9 1165 src/dps8/dps8_disk.c word9 dau_type = (word9) diskTypes[dsk_states[dsk_unit_idx].typeIdx].dau_type; word9 195 src/dps8/dps8_eis.c static word9 get9(word36 w, int pos) word9 296 src/dps8/dps8_eis.c static word36 put9 (word36 w, int pos, word9 c) word9 912 src/dps8/dps8_eis.c static word9 EISget469 (int k, uint i) word9 946 src/dps8/dps8_eis.c word9 c = 0; word9 954 src/dps8/dps8_eis.c c = (word9) get4 (data, (int) residue); word9 958 src/dps8/dps8_eis.c c = (word9) get6 (data, (int) residue); word9 974 src/dps8/dps8_eis.c static void EISput469 (int k, uint i, word9 c469) word9 1035 src/dps8/dps8_eis.c static word9 EISget49 (EISaddr * p, int * pos, int tn) word9 1057 src/dps8/dps8_eis.c word9 c = 0; word9 3029 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 3039 src/dps8/dps8_eis.c word9 c1 = EISget469 (1, cpu.du.CHTALLY); // get Y-char1n word9 3040 src/dps8/dps8_eis.c word9 c2 = EISget469 (2, cpu.du.CHTALLY); // get Y-char2n word9 3056 src/dps8/dps8_eis.c word9 c1 = fill; // use fill for Y-char1n word9 3057 src/dps8/dps8_eis.c word9 c2 = EISget469 (2, cpu.du.CHTALLY); // get Y-char2n word9 3073 src/dps8/dps8_eis.c word9 c1 = EISget469 (1, cpu.du.CHTALLY); // get Y-char1n word9 3074 src/dps8/dps8_eis.c word9 c2 = fill; // use fill for Y-char2n word9 3172 src/dps8/dps8_eis.c word9 c1 = 0; word9 3173 src/dps8/dps8_eis.c word9 c2 = 0; word9 3246 src/dps8/dps8_eis.c word9 yCharn11; word9 3247 src/dps8/dps8_eis.c word9 yCharn12; word9 3355 src/dps8/dps8_eis.c word9 c1 = 0; word9 3356 src/dps8/dps8_eis.c word9 c2 = 0; word9 3426 src/dps8/dps8_eis.c word9 yCharn11; word9 3427 src/dps8/dps8_eis.c word9 yCharn12; word9 3557 src/dps8/dps8_eis.c word9 ctest = 0; word9 3607 src/dps8/dps8_eis.c word9 yCharn1 = EISget469 (1, cpu.du.CHTALLY); word9 3608 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; word9 3729 src/dps8/dps8_eis.c word9 ctest = 0; word9 3778 src/dps8/dps8_eis.c word9 yCharn1 = EISget469 (1, limit - cpu.du.CHTALLY - 1); word9 3779 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; word9 3805 src/dps8/dps8_eis.c word9 3811 src/dps8/dps8_eis.c word9 3825 src/dps8/dps8_eis.c static word9 xlate (EISaddr * xlatTbl, uint dstTA, uint c) word9 3831 src/dps8/dps8_eis.c word9 cout = GETBYTE (entry, pos9); word9 3993 src/dps8/dps8_eis.c word9 c = EISget469 (1, cpu.du.CHTALLY); // get src char word9 4010 src/dps8/dps8_eis.c word9 cout = xlate (&e->ADDR2, CTA9, m); word9 4189 src/dps8/dps8_eis.c word9 c = EISget469 (1, limit - cpu.du.CHTALLY - 1); // get src char word9 4206 src/dps8/dps8_eis.c word9 cout = xlate (&e->ADDR2, CTA9, m); word9 4244 src/dps8/dps8_eis.c word9 4249 src/dps8/dps8_eis.c word9 4385 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 4386 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 4601 src/dps8/dps8_eis.c word9 c = EISget469 (1, cpu.du.CHTALLY); // get src char word9 4602 src/dps8/dps8_eis.c word9 cout = 0; word9 4783 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 4784 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 4901 src/dps8/dps8_eis.c word9 c = EISget469 (1, e -> N1 - cpu.du.CHTALLY - 1); // get src char word9 4902 src/dps8/dps8_eis.c word9 cout = 0; word9 5024 src/dps8/dps8_eis.c word9 *p = e->inBuffer; // p points to position in inBuffer where 4-bit chars are stored word9 5042 src/dps8/dps8_eis.c word9 c = EISget49(a, &pos, TN); word9 5168 src/dps8/dps8_eis.c for (word9 *q = e->inBuffer; q < p; q ++) word9 5185 src/dps8/dps8_eis.c word9 * p = e -> inBuffer; word9 5198 src/dps8/dps8_eis.c word9 c = EISget469 (k, n); word9 5209 src/dps8/dps8_eis.c word9 c49 = e -> outBuffer [n]; word9 5214 src/dps8/dps8_eis.c static void writeToOutputBuffer (word9 **dstAddr, int szSrc, int szDst, word9 c49) word9 5345 src/dps8/dps8_eis.c word9 entry = EISget49(&e->ADDR2, &e->mopPos, CTN9); // get mop table entries word9 5347 src/dps8/dps8_eis.c word9 entry = EISget49(e->mopAddress, &e->mopPos, CTN9); // get mop table entries word9 5504 src/dps8/dps8_eis.c word9 c = EISget49(&e->ADDR2, &e->mopPos, CTN9); word9 5506 src/dps8/dps8_eis.c word9 c = EISget49(e->mopAddress, &e->mopPos, CTN9); word9 5543 src/dps8/dps8_eis.c word9 5545 src/dps8/dps8_eis.c word9 5836 src/dps8/dps8_eis.c word9 next = EISget49(&e->ADDR2, &e->mopPos, CTN9); word9 5838 src/dps8/dps8_eis.c word9 next = EISget49(e->mopAddress, &e->mopPos, CTN9); word9 5908 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6004 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6113 src/dps8/dps8_eis.c word9 c = (*e->in | (!e->mopSN ? e->editInsertionTable[2] : e->editInsertionTable[3])); word9 6222 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6268 src/dps8/dps8_eis.c word9 c = *e->in; word9 6334 src/dps8/dps8_eis.c word9 c = *e->in; word9 6488 src/dps8/dps8_eis.c word9 mop9 = (word9) get9 (p -> data, e -> mopPos); // get 9-bit mop word9 6526 src/dps8/dps8_eis.c word9 *p9 = e->editInsertionTable; // re-initialize edit insertion table word9 6528 src/dps8/dps8_eis.c while((*p9++ = (word9) (*q++))) word9 7167 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 7168 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 7190 src/dps8/dps8_eis.c word9 c = EISget469(1, cpu.du.CHTALLY); // get src char word9 7204 src/dps8/dps8_eis.c word9 cout = xlate(&e->ADDR3, dstTA, (uint) cidx); word9 7251 src/dps8/dps8_eis.c word9 cfill = xlate(&e->ADDR3, dstTA, fillT); word9 7529 src/dps8/dps8_eis.c static void EISwrite9(EISaddr *p, int *pos, word9 char9) word9 7576 src/dps8/dps8_eis.c static void EISwrite49(EISaddr *p, int *pos, int tn, word9 c49) word9 7815 src/dps8/dps8_eis.c (word9) (res[i] - '0')); word9 7818 src/dps8/dps8_eis.c EISwrite49 (& e->ADDR2, & pos, (int) dstTN, (word9) res[i]); word9 9048 src/dps8/dps8_eis.c word9 9098 src/dps8/dps8_eis.c word9 9313 src/dps8/dps8_eis.c word9 9386 src/dps8/dps8_eis.c word9 9656 src/dps8/dps8_eis.c EISwrite49(&e->ADDR2, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 9659 src/dps8/dps8_eis.c EISwrite49(&e->ADDR2, &pos, (int) dstTN, (word9) res[i]); word9 9893 src/dps8/dps8_eis.c word9 10067 src/dps8/dps8_eis.c EISwrite9(&e->ADDR2, &pos, (word9) rshift_128 (x, (uint) shift).l & 0777); word9 10069 src/dps8/dps8_eis.c EISwrite9(&e->ADDR2, &pos, (word9) (x >> shift )& 0777); word9 10327 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[j] - '0')); word9 10330 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[j]); word9 10708 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 10711 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11020 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11023 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11350 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11353 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11619 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11622 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11925 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11928 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 12896 src/dps8/dps8_eis.c word9 inBufferop1 [64]; word9 13062 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 13065 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 13308 src/dps8/dps8_eis.c word9 inBufferop1 [64]; word9 13492 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 13495 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 507 src/dps8/dps8_fnp2.c l_putbits36_9 (& data, 9, (word9) n_chars); // n_chars word9 167 src/dps8/dps8_fnp2.h word9 lineType; word9 210 src/dps8/dps8_fnp2_iomcmd.c linep->lineType = (word9) getbits36_18 (command_data[0], 0); word9 294 src/dps8/dps8_fnp2_iomcmd.c word9 c1 = getbits36_9 (command_data[0], 27); word9 296 src/dps8/dps8_fnp2_iomcmd.c word9 c3 = getbits36_9 (command_data[1], 9); word9 317 src/dps8/dps8_fnp2_iomcmd.c word9 c1 = getbits36_9 (command_data[0], 27); word9 319 src/dps8/dps8_fnp2_iomcmd.c word9 c3 = getbits36_9 (command_data[1], 9); word9 430 src/dps8/dps8_hw_consts.h # define GET_OP(x) ((word9) (((x) >> INST_V_OP) & INST_M_OP )) word9 2287 src/dps8/dps8_ins.c PNL (cpu.ou.RS = (word9) i->opcode); word9 631 src/dps8/dps8_iom.c word9 configSwMultiplexBaseAddress; word9 1187 src/dps8/dps8_iom.c p -> configSwMultiplexBaseAddress = (word9) v; word9 2634 src/dps8/dps8_iom.c putbits36_9 (& faultWord, 9, (word9) chan); word9 378 src/dps8/dps8_prt.c static word9 gc (word36 * b, uint os) word9 382 src/dps8/dps8_prt.c return (word9) getbits36_9 (b[wordno], charno * 9); word9 405 src/dps8/dps8_prt.c word9 ch = gc (b, 2 + i); word9 417 src/dps8/dps8_prt.c word9 ch = gc (b, 9 + i); word9 488 src/dps8/dps8_prt.c word9 ch = getbits36_9 (buffer[0], 18); word9 1684 src/dps8/dps8_scu.c word9 mask = ((maskab ? regq : rega) >> 27) & 0777; word9 1983 src/dps8/dps8_scu.c word9 maskab [2]; word9 421 src/dps8/dps8_socket_dev.c word9 cnt = getbits36_9 (buffer [0], 27); word9 430 src/dps8/dps8_socket_dev.c word9 450 src/dps8/dps8_socket_dev.c word9 ch = getbits36_9 (buffer[wordno], offset); word9 1215 src/dps8/dps8_socket_dev.c putbits36_9 (& buffer [5 + wordno], charno * 9, (word9) netdata [n]); word9 889 src/dps8/dps8_utils.c void putByte(word36 *dst, word9 data, int posn) word9 59 src/dps8/dps8_utils.h void putByte(word36 *dst, word9 data, int posn); word9 219 src/dps8/dps8_utils.h static inline word9 getbits36_9 (word36 x, uint i) word9 413 src/dps8/dps8_utils.h static inline word36 setbits36_9 (word36 x, uint p, word9 val) word9 597 src/dps8/dps8_utils.h static inline void putbits36_9 (word36 * x, uint p, word9 val)