word9 276 src/dps8/dps8.h # define GETBYTE(src, pos) (word9)(((word36)src >> (word36)((3 - pos) * 9)) & 0777) word9 1498 src/dps8/dps8_console.c word9 4147 src/dps8/dps8_cpu.c void add_dps8m_DU_OU_history (word36 flags, word18 ICT, word9 RS_REG, word9 flags2) word9 4156 src/dps8/dps8_cpu.c void add_dps8m_APU_history (word15 ESN, word21 flags, word24 RMA, word3 RTRR, word9 flags2) word9 185 src/dps8/dps8_cpu.h word9 BASE; // Contains the 9 high-order bits of an 18-bit address word9 188 src/dps8/dps8_cpu.h word9 BOUND; // Contains the 9 high-order bits of the unrelocated word9 444 src/dps8/dps8_cpu.h word9 OPCODE; // 0 OPCODE 18 - 26 word9 609 src/dps8/dps8_cpu.h word9 editInsertionTable [8]; // 8 9-bit chars word9 614 src/dps8/dps8_cpu.h word9 inBuffer [64]; // decimal unit input buffer word9 615 src/dps8/dps8_cpu.h word9 *in; // pointer to current read position in inBuffer word9 617 src/dps8/dps8_cpu.h word9 outBuffer [64]; // output buffer word9 618 src/dps8/dps8_cpu.h word9 *out; // pointer to current write position in outBuffer; word9 780 src/dps8/dps8_cpu.h word9 cycle; word9 785 src/dps8/dps8_cpu.h word9 RS; word9 2377 src/dps8/dps8_cpu.h void add_dps8m_DUOU_history (word36 flags, word18 ICT, word9 RS_REG, word9 flags2); word9 2378 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 911 src/dps8/dps8_eis.c static word9 EISget469 (int k, uint i) word9 945 src/dps8/dps8_eis.c word9 c = 0; word9 953 src/dps8/dps8_eis.c c = (word9) get4 (data, (int) residue); word9 957 src/dps8/dps8_eis.c c = (word9) get6 (data, (int) residue); word9 973 src/dps8/dps8_eis.c static void EISput469 (int k, uint i, word9 c469) word9 1034 src/dps8/dps8_eis.c static word9 EISget49 (EISaddr * p, int * pos, int tn) word9 1056 src/dps8/dps8_eis.c word9 c = 0; word9 3028 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 3038 src/dps8/dps8_eis.c word9 c1 = EISget469 (1, cpu.du.CHTALLY); // get Y-char1n word9 3039 src/dps8/dps8_eis.c word9 c2 = EISget469 (2, cpu.du.CHTALLY); // get Y-char2n word9 3055 src/dps8/dps8_eis.c word9 c1 = fill; // use fill for Y-char1n word9 3056 src/dps8/dps8_eis.c word9 c2 = EISget469 (2, cpu.du.CHTALLY); // get Y-char2n word9 3072 src/dps8/dps8_eis.c word9 c1 = EISget469 (1, cpu.du.CHTALLY); // get Y-char1n word9 3073 src/dps8/dps8_eis.c word9 c2 = fill; // use fill for Y-char2n word9 3171 src/dps8/dps8_eis.c word9 c1 = 0; word9 3172 src/dps8/dps8_eis.c word9 c2 = 0; word9 3245 src/dps8/dps8_eis.c word9 yCharn11; word9 3246 src/dps8/dps8_eis.c word9 yCharn12; word9 3354 src/dps8/dps8_eis.c word9 c1 = 0; word9 3355 src/dps8/dps8_eis.c word9 c2 = 0; word9 3425 src/dps8/dps8_eis.c word9 yCharn11; word9 3426 src/dps8/dps8_eis.c word9 yCharn12; word9 3556 src/dps8/dps8_eis.c word9 ctest = 0; word9 3606 src/dps8/dps8_eis.c word9 yCharn1 = EISget469 (1, cpu.du.CHTALLY); word9 3607 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; word9 3728 src/dps8/dps8_eis.c word9 ctest = 0; word9 3777 src/dps8/dps8_eis.c word9 yCharn1 = EISget469 (1, limit - cpu.du.CHTALLY - 1); word9 3778 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; word9 3804 src/dps8/dps8_eis.c word9 3810 src/dps8/dps8_eis.c word9 3824 src/dps8/dps8_eis.c static word9 xlate (EISaddr * xlatTbl, uint dstTA, uint c) word9 3830 src/dps8/dps8_eis.c word9 cout = GETBYTE (entry, pos9); word9 3992 src/dps8/dps8_eis.c word9 c = EISget469 (1, cpu.du.CHTALLY); // get src char word9 4009 src/dps8/dps8_eis.c word9 cout = xlate (&e->ADDR2, CTA9, m); word9 4188 src/dps8/dps8_eis.c word9 c = EISget469 (1, limit - cpu.du.CHTALLY - 1); // get src char word9 4205 src/dps8/dps8_eis.c word9 cout = xlate (&e->ADDR2, CTA9, m); word9 4243 src/dps8/dps8_eis.c word9 4248 src/dps8/dps8_eis.c word9 4384 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 4385 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 4600 src/dps8/dps8_eis.c word9 c = EISget469 (1, cpu.du.CHTALLY); // get src char word9 4601 src/dps8/dps8_eis.c word9 cout = 0; word9 4782 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 4783 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 4900 src/dps8/dps8_eis.c word9 c = EISget469 (1, e -> N1 - cpu.du.CHTALLY - 1); // get src char word9 4901 src/dps8/dps8_eis.c word9 cout = 0; word9 5023 src/dps8/dps8_eis.c word9 *p = e->inBuffer; // p points to position in inBuffer where 4-bit chars are stored word9 5041 src/dps8/dps8_eis.c word9 c = EISget49(a, &pos, TN); word9 5167 src/dps8/dps8_eis.c for (word9 *q = e->inBuffer; q < p; q ++) word9 5184 src/dps8/dps8_eis.c word9 * p = e -> inBuffer; word9 5197 src/dps8/dps8_eis.c word9 c = EISget469 (k, n); word9 5208 src/dps8/dps8_eis.c word9 c49 = e -> outBuffer [n]; word9 5213 src/dps8/dps8_eis.c static void writeToOutputBuffer (word9 **dstAddr, int szSrc, int szDst, word9 c49) word9 5344 src/dps8/dps8_eis.c word9 entry = EISget49(&e->ADDR2, &e->mopPos, CTN9); // get mop table entries word9 5346 src/dps8/dps8_eis.c word9 entry = EISget49(e->mopAddress, &e->mopPos, CTN9); // get mop table entries word9 5503 src/dps8/dps8_eis.c word9 c = EISget49(&e->ADDR2, &e->mopPos, CTN9); word9 5505 src/dps8/dps8_eis.c word9 c = EISget49(e->mopAddress, &e->mopPos, CTN9); word9 5542 src/dps8/dps8_eis.c word9 5544 src/dps8/dps8_eis.c word9 5835 src/dps8/dps8_eis.c word9 next = EISget49(&e->ADDR2, &e->mopPos, CTN9); word9 5837 src/dps8/dps8_eis.c word9 next = EISget49(e->mopAddress, &e->mopPos, CTN9); word9 5907 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6003 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6112 src/dps8/dps8_eis.c word9 c = (*e->in | (!e->mopSN ? e->editInsertionTable[2] : e->editInsertionTable[3])); word9 6221 src/dps8/dps8_eis.c word9 c = *(e->in); word9 6267 src/dps8/dps8_eis.c word9 c = *e->in; word9 6333 src/dps8/dps8_eis.c word9 c = *e->in; word9 6487 src/dps8/dps8_eis.c word9 mop9 = (word9) get9 (p -> data, e -> mopPos); // get 9-bit mop word9 6525 src/dps8/dps8_eis.c word9 *p9 = e->editInsertionTable; // re-initialize edit insertion table word9 6527 src/dps8/dps8_eis.c while((*p9++ = (word9) (*q++))) word9 7166 src/dps8/dps8_eis.c word9 fill = getbits36_9 (cpu.cu.IWB, 0); word9 7167 src/dps8/dps8_eis.c word9 fillT = fill; // possibly truncated fill pattern word9 7189 src/dps8/dps8_eis.c word9 c = EISget469(1, cpu.du.CHTALLY); // get src char word9 7203 src/dps8/dps8_eis.c word9 cout = xlate(&e->ADDR3, dstTA, (uint) cidx); word9 7250 src/dps8/dps8_eis.c word9 cfill = xlate(&e->ADDR3, dstTA, fillT); word9 7528 src/dps8/dps8_eis.c static void EISwrite9(EISaddr *p, int *pos, word9 char9) word9 7575 src/dps8/dps8_eis.c static void EISwrite49(EISaddr *p, int *pos, int tn, word9 c49) word9 7814 src/dps8/dps8_eis.c (word9) (res[i] - '0')); word9 7817 src/dps8/dps8_eis.c EISwrite49 (& e->ADDR2, & pos, (int) dstTN, (word9) res[i]); word9 9047 src/dps8/dps8_eis.c word9 9097 src/dps8/dps8_eis.c word9 9312 src/dps8/dps8_eis.c word9 9385 src/dps8/dps8_eis.c word9 9655 src/dps8/dps8_eis.c EISwrite49(&e->ADDR2, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 9658 src/dps8/dps8_eis.c EISwrite49(&e->ADDR2, &pos, (int) dstTN, (word9) res[i]); word9 9892 src/dps8/dps8_eis.c word9 10066 src/dps8/dps8_eis.c EISwrite9(&e->ADDR2, &pos, (word9) rshift_128 (x, (uint) shift).l & 0777); word9 10068 src/dps8/dps8_eis.c EISwrite9(&e->ADDR2, &pos, (word9) (x >> shift )& 0777); word9 10326 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[j] - '0')); word9 10329 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[j]); word9 10707 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 10710 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11019 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11022 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11349 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11352 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11618 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11621 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 11924 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 11927 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 12895 src/dps8/dps8_eis.c word9 inBufferop1 [64]; word9 13061 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 13064 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) res[i]); word9 13307 src/dps8/dps8_eis.c word9 inBufferop1 [64]; word9 13491 src/dps8/dps8_eis.c EISwrite49(&e->ADDR3, &pos, (int) dstTN, (word9) (res[i] - '0')); word9 13494 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 433 src/dps8/dps8_hw_consts.h # define GET_OP(x) ((word9) (((x) >> INST_V_OP) & INST_M_OP )) word9 2307 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 1647 src/dps8/dps8_scu.c word9 mask = ((maskab ? regq : rega) >> 27) & 0777; word9 1945 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)