rA 64 src/dps8/dps8_addrmods.c return GETHI (cpu.rA); rA 90 src/dps8/dps8_addrmods.c return GETLO (cpu.rA); rA 938 src/dps8/dps8_cpu.c cpu.rA = 0; rA 1548 src/dps8/dps8_cpu.h word36 rA; // accumulator rA 338 src/dps8/dps8_eis.c return GETHI (cpu.rA); rA 353 src/dps8/dps8_eis.c return cpu.rA; // See AL36, Table 4-1 rA 401 src/dps8/dps8_eis.c return GETHI (cpu.rA); rA 450 src/dps8/dps8_eis.c return GETLO (cpu.rA); rA 493 src/dps8/dps8_eis.c return GETHI (cpu.rA); rA 525 src/dps8/dps8_eis.c return cpu.rA; rA 2303 src/dps8/dps8_ins.c cpu.rA, cpu.rQ, dump_flags (buf, cpu.cu.IR)); rA 2306 src/dps8/dps8_ins.c cpu.rE, cpu.rA, cpu.rQ, EAQToIEEElongdouble (cpup)); rA 2309 src/dps8/dps8_ins.c cpu.rE, cpu.rA, cpu.rQ, EAQToIEEEdouble (cpup)); rA 2774 src/dps8/dps8_ins.c cpu.rA = cpu.CY; rA 2778 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 2779 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 2842 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 2860 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 2869 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3044 src/dps8/dps8_ins.c cmp36 (cpup, cpu.rA, cpu.CY, &cpu.cu.IR); rA 3068 src/dps8/dps8_ins.c word36 trZ = cpu.rA & cpu.CY; rA 3077 src/dps8/dps8_ins.c cpu.rA = cpu.Ypair[0]; rA 3085 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0) rA 3086 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3122 src/dps8/dps8_ins.c cpu.Ypair[0] = cpu.rA; rA 3171 src/dps8/dps8_ins.c capture = cpu.rA & barrelLeftMaskTable[cnt + 1]; rA 3174 src/dps8/dps8_ins.c cpu.rA <<= cnt; rA 3175 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 3181 src/dps8/dps8_ins.c capture = cpu.rA; rA 3182 src/dps8/dps8_ins.c cpu.rA = 0; rA 3192 src/dps8/dps8_ins.c word36 tmpSign = cpu.rA & SIGN36; rA 3197 src/dps8/dps8_ins.c cpu.rA <<= 1; rA 3198 src/dps8/dps8_ins.c if (tmpSign != (cpu.rA & SIGN36)) rA 3201 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 3207 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3208 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3323 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 3338 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 3351 src/dps8/dps8_ins.c cpu.rA = cpu.rA | cpu.CY; rA 3352 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 3357 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3358 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3427 src/dps8/dps8_ins.c cpu.rA = cpu.rA & cpu.CY; rA 3428 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 3432 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3433 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3446 src/dps8/dps8_ins.c cpu.rA = (cpu.CY & FLOAT36MASK) << 8; rA 3455 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3456 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3469 src/dps8/dps8_ins.c cpu.rA = cpu.TPR.TRR & MASK3; rA 3470 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.TPR.TSR & MASK15) << 18; rA 3481 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3572 src/dps8/dps8_ins.c cpu.rA = 0; rA 3573 src/dps8/dps8_ins.c SETHI (cpu.rA, cpu.TPR.CA); rA 3607 src/dps8/dps8_ins.c cpu.rA = compl36 (cpup, cpu.CY, & cpu.cu.IR, & ovf); rA 3656 src/dps8/dps8_ins.c cpu.rA = cpu.Ypair[0]; rA 3670 src/dps8/dps8_ins.c cpu.rA = 0; rA 3690 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 3696 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3697 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3706 src/dps8/dps8_ins.c cpu.rA = cpu.CY; rA 3710 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3711 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3794 src/dps8/dps8_ins.c cpu.rA = cpu.Yblock8[4]; rA 3837 src/dps8/dps8_ins.c cpu.Yblock8[4] = cpu.rA; rA 3868 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3883 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3900 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3958 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 4086 src/dps8/dps8_ins.c word36 highA = cpu.rA & barrelLeftMaskTable[cnt]; rA 4087 src/dps8/dps8_ins.c cpu.rA <<= cnt; rA 4090 src/dps8/dps8_ins.c cpu.rA |= highA; rA 4091 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4096 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4097 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4099 src/dps8/dps8_ins.c cpu.rA |= 1; rA 4101 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4107 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4108 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4122 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4125 src/dps8/dps8_ins.c cpu.rA >>= tmp36; rA 4126 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4131 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4132 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4146 src/dps8/dps8_ins.c bool A0 = (cpu.rA & SIGN36) != 0; rA 4149 src/dps8/dps8_ins.c cpu.rA = A0 ? MASK36 : 0; rA 4152 src/dps8/dps8_ins.c cpu.rA >>= cnt; rA 4155 src/dps8/dps8_ins.c cpu.rA |= barrelLeftMaskTable[cnt]; rA 4157 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4160 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4162 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4165 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4168 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4170 src/dps8/dps8_ins.c cpu.rA |= SIGN36; rA 4172 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4178 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4179 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4197 src/dps8/dps8_ins.c word36 tmp = cpu.rA; rA 4198 src/dps8/dps8_ins.c cpu.rA = cpu.rQ; rA 4201 src/dps8/dps8_ins.c word36 highA = cpu.rA & barrelLeftMaskTable[cnt]; rA 4202 src/dps8/dps8_ins.c word36 lowA = cpu.rA & BS_COMPL(barrelLeftMaskTable[cnt]); rA 4205 src/dps8/dps8_ins.c cpu.rA = (lowA << cnt) | (highQ >> (36 - cnt)); rA 4211 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4213 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4217 src/dps8/dps8_ins.c cpu.rA |= 1; // Q0 => A35 rA 4226 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4233 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4234 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4250 src/dps8/dps8_ins.c captureA = cpu.rA & barrelLeftMaskTable[cnt + 1]; rA 4258 src/dps8/dps8_ins.c captureA = cpu.rA; rA 4271 src/dps8/dps8_ins.c cpu.rA = cpu.rQ; rA 4275 src/dps8/dps8_ins.c word36 lowA = cpu.rA & BS_COMPL(barrelLeftMaskTable[cnt]); rA 4278 src/dps8/dps8_ins.c cpu.rA = (lowA << cnt) | (highQ >> (36 - cnt)); rA 4289 src/dps8/dps8_ins.c word36 tmpSign = cpu.rA & SIGN36; rA 4292 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4294 src/dps8/dps8_ins.c if (tmpSign != (cpu.rA & SIGN36)) rA 4299 src/dps8/dps8_ins.c cpu.rA |= 1; // Q0 => A35 rA 4304 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4312 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4313 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4328 src/dps8/dps8_ins.c cpu.rA = 0; rA 4336 src/dps8/dps8_ins.c word36 lowA = cpu.rA & barrelRightMaskTable[cnt]; rA 4338 src/dps8/dps8_ins.c cpu.rA >>= cnt; rA 4340 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4347 src/dps8/dps8_ins.c cpu.rQ = cpu.rA >> (cnt - 36); rA 4350 src/dps8/dps8_ins.c cpu.rA = 0; rA 4352 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4355 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4360 src/dps8/dps8_ins.c bool a35 = cpu.rA & 1; // A35 rA 4361 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4368 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4376 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4377 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4392 src/dps8/dps8_ins.c bool AQ0 = (cpu.rA & SIGN36) != 0; rA 4394 src/dps8/dps8_ins.c cpu.rA = cpu.rQ = AQ0 ? MASK36 : 0; rA 4401 src/dps8/dps8_ins.c word36 lowA = cpu.rA & barrelRightMaskTable[cnt]; rA 4403 src/dps8/dps8_ins.c cpu.rA >>= cnt; rA 4406 src/dps8/dps8_ins.c cpu.rA |= barrelLeftMaskTable[cnt]; rA 4408 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4415 src/dps8/dps8_ins.c cpu.rQ = cpu.rA >> (cnt - 36); rA 4419 src/dps8/dps8_ins.c cpu.rA = MASK36; rA 4422 src/dps8/dps8_ins.c cpu.rA = 0; rA 4425 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4429 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4431 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4435 src/dps8/dps8_ins.c bool a35 = cpu.rA & 1; // A35 rA 4437 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4439 src/dps8/dps8_ins.c cpu.rA |= SIGN36; rA 4445 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits (probably ain't necessary) rA 4453 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4454 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4584 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNOC, & cpu.cu.IR, & ovf); rA 4602 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4604 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4623 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4625 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4648 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4650 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4670 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNC, & cpu.cu.IR, & ovf); rA 4761 src/dps8/dps8_ins.c cpu.CY = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNOC, rA 4815 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, TST_I_CARRY ? 1 : 0, rA 4854 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNOC, & cpu.cu.IR, & ovf); rA 4872 src/dps8/dps8_ins.c tmp72 = Sub72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), tmp72, 1, rA 4875 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4893 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNC, & cpu.cu.IR, & ovf); rA 4916 src/dps8/dps8_ins.c tmp72 = Sub72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), tmp72, 1, rA 4918 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 5021 src/dps8/dps8_ins.c cpu.CY = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNOC, & cpu.cu.IR, & ovf); rA 5076 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, TST_I_CARRY ? 1 : 0, rA 5123 src/dps8/dps8_ins.c word72 tmp72 = multiply_128 (SIGNEXT36_72 (cpu.rA), SIGNEXT36_72 (cpu.CY)); rA 5129 src/dps8/dps8_ins.c word72 tmp72 = (word72) (((word72s) SIGNEXT36_72 (cpu.rA)) * ((word72s) SIGNEXT36_72 (cpu.CY))); rA 5136 src/dps8/dps8_ins.c if (cpu.rA == MAXNEG && cpu.CY == MAXNEG) rA 5143 src/dps8/dps8_ins.c convert_to_word36 (tmp72, &cpu.rA, &cpu.rQ); rA 5148 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 5149 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5165 src/dps8/dps8_ins.c convert_to_word36 (cast_128 (prod), &cpu.rA, &cpu.rQ); rA 5172 src/dps8/dps8_ins.c convert_to_word36 ((word72)prod, &cpu.rA, &cpu.rQ); rA 5179 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 5180 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5216 src/dps8/dps8_ins.c cpu.rA = (cpu.rQ & SIGN36) ? 0 : SIGN36; // works for case 1,2 rA 5307 src/dps8/dps8_ins.c cpu.rA = (word36) remainder & DMASK; rA 5314 src/dps8/dps8_ins.c sim_debug (DBG_CAC, & cpu_dev, "rA (rem) %012"PRIo64"\n", cpu.rA); rA 5354 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5355 src/dps8/dps8_ins.c if (cpu.rA == 0400000000000ULL) rA 5364 src/dps8/dps8_ins.c cpu.rA = (word36) (- (word36s) cpu.rA); rA 5366 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 5371 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 5372 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5383 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5386 src/dps8/dps8_ins.c if (cpu.rA == 0400000000000ULL && cpu.rQ == 0) rA 5393 src/dps8/dps8_ins.c word72 tmp72 = convert_to_word72 (cpu.rA, cpu.rQ); rA 5408 src/dps8/dps8_ins.c convert_to_word36 (tmp72, &cpu.rA, &cpu.rQ); rA 5431 src/dps8/dps8_ins.c t_int64 a = SIGNEXT36_64 (cpu.rA); rA 5468 src/dps8/dps8_ins.c word36 Z = ~cpu.rQ & (cpu.rA ^ cpu.CY); rA 5501 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 5546 src/dps8/dps8_ins.c cmp36wl (cpup, cpu.rA, cpu.CY, cpu.rQ, &cpu.cu.IR); rA 5598 src/dps8/dps8_ins.c cpu.CY = cpu.rA & cpu.CY; rA 5687 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 5701 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 5730 src/dps8/dps8_ins.c cpu.CY = cpu.rA | cpu.CY; rA 5807 src/dps8/dps8_ins.c cpu.rA = cpu.rA ^ cpu.CY; rA 5808 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5813 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 5814 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5840 src/dps8/dps8_ins.c cpu.CY = cpu.rA ^ cpu.CY; rA 5927 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 5994 src/dps8/dps8_ins.c word36 trZ = cpu.rA & ~cpu.CY; rA 6011 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 6078 src/dps8/dps8_ins.c cpu.rA = (cpu.Ypair[0] & FLOAT36MASK) << 8; rA 6079 src/dps8/dps8_ins.c cpu.rA |= (cpu.Ypair[1] >> 28) & MASK8; rA 6088 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 6089 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 6107 src/dps8/dps8_ins.c ((cpu.rA & 0777777777400LLU) >> 8); rA 6108 src/dps8/dps8_ins.c cpu.Ypair[1] = ((cpu.rA & 0377) << 28) | rA 6126 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 6127 src/dps8/dps8_ins.c cpu.CY = ((word36)cpu.rE << 28) | (((cpu.rA >> 8) & 01777777777LL)); rA 6336 src/dps8/dps8_ins.c fno (cpup, & cpu.rE, & cpu.rA, & cpu.rQ); rA 7105 src/dps8/dps8_ins.c 040, & cpu.rA, & cpu.rQ); rA 7124 src/dps8/dps8_ins.c word72 big = convert_to_word72 (cpu.rA, cpu.rQ); rA 7347 src/dps8/dps8_ins.c word36 tmp1 = cpu.rA & SIGN36; // A0 rA 7348 src/dps8/dps8_ins.c word36 tmp36 = (cpu.rA << 3) & DMASK; rA 7373 src/dps8/dps8_ins.c cpu.rA = tmp36r & DMASK; // remainder -> C(A) rA 7378 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); // If C(A) = 0, then ON; rA 7389 src/dps8/dps8_ins.c word36 tmp = cpu.rA & MASK36; rA 7397 src/dps8/dps8_ins.c cpu.rA = tmp; rA 7402 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); // If C(A) = 0, then ON; rA 7404 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); // If C(A)0 = 1, then ON; rA 8064 src/dps8/dps8_ins.c & cpu.rA, & cpu.rQ); rA 8071 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8072 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 8141 src/dps8/dps8_ins.c & cpu.rA, & cpu.rQ); rA 8161 src/dps8/dps8_ins.c cpu.rA = PROM[cpu.TPR.CA & 1023]; rA 8169 src/dps8/dps8_ins.c cpu.rA = cpu.switches.data_switches; rA 8199 src/dps8/dps8_ins.c cpu.rA = 0; rA 8200 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [0] & 07LL) rA 8202 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [0] & 01LL) rA 8204 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [0] & 01LL) rA 8206 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [0] ? 1LL:0LL) rA 8208 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [0] & 07LL) rA 8211 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [1] & 07LL) rA 8213 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [1] & 01LL) rA 8215 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [1] & 01LL) rA 8217 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [1] ? 1LL:0LL) rA 8219 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [1] & 07LL) rA 8222 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [2] & 07LL) rA 8224 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [2] & 01LL) rA 8226 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [2] & 01LL) rA 8228 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [2] ? 1LL:0LL) rA 8230 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [2] & 07LL) rA 8233 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [3] & 07LL) rA 8235 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [3] & 01LL) rA 8237 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [3] & 01LL) rA 8239 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [3] ? 1LL:0LL) rA 8241 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [3] & 07LL) rA 8312 src/dps8/dps8_ins.c cpu.rA = 0; rA 8314 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[0] == 2 ? rA 8316 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[1] == 2 ? rA 8318 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[2] == 2 ? rA 8320 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[3] == 2 ? rA 8330 src/dps8/dps8_ins.c cpu.rA |= (word36) ((01L) /* 0b01 DPS8M */ rA 8332 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.FLT_BASE & 0177LL) rA 8334 src/dps8/dps8_ins.c DPS8M_ (cpu.rA |= (word36) ((01L) /* 0b1 ID_PROM installed */ rA 8351 src/dps8/dps8_ins.c cpu.rA |= (word36) ((01L) // 0b1 L68/DPS option: DPS rA 8357 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.enable_cache ? 1 : 0) rA 8362 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.procMode) /* 0b1 DPS8M */ rA 8364 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.procMode & 1U) rA 8372 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.options.proc_speed & 017LL) rA 8383 src/dps8/dps8_ins.c cpu.rA |= (word36) ((016L) // 0b1110 CPU ID rA 8386 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.cpu_num & 07LL) rA 8392 src/dps8/dps8_ins.c cpu.rA = 0; rA 8422 src/dps8/dps8_ins.c cpu.rA = 0; rA 8423 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [4] & 07LL) rA 8425 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [4] & 01LL) rA 8427 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [4] & 01LL) rA 8429 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [4] ? 1LL:0LL) rA 8431 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [4] & 07LL) rA 8434 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [5] & 07LL) rA 8436 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [5] & 01LL) rA 8438 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [5] & 01LL) rA 8440 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [5] ? 1LL:0LL) rA 8442 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [5] & 07LL) rA 8445 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [6] & 07LL) rA 8447 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [6] & 01LL) rA 8449 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [6] & 01LL) rA 8451 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [6] ? 1LL:0LL) rA 8453 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [6] & 07LL) rA 8456 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [7] & 07LL) rA 8458 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [7] & 01LL) rA 8460 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [7] & 01LL) rA 8462 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [7] ? 1LL:0LL) rA 8464 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [7] & 07LL) rA 8484 src/dps8/dps8_ins.c cpu.rA = 0; rA 8485 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [0] == 2 ? rA 8487 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [1] == 2 ? rA 8489 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [2] == 2 ? rA 8491 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [3] == 2 ? rA 8494 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [4] == 2 ? rA 8496 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [5] == 2 ? rA 8498 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [6] == 2 ? rA 8500 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [7] == 2 ? rA 8514 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8515 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 8575 src/dps8/dps8_ins.c current_running_cpu_idx, cpu.rA, cpu.rQ); rA 8612 src/dps8/dps8_ins.c cpu_port_num, cpu.rA); rA 8641 src/dps8/dps8_ins.c cpu.rA, cpu.rQ); rA 8656 src/dps8/dps8_ins.c cpu.rA = result; rA 8660 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8661 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 9544 src/dps8/dps8_ins.c rA 9547 src/dps8/dps8_ins.c rA 9554 src/dps8/dps8_ins.c rA 9563 src/dps8/dps8_ins.c rA 9575 src/dps8/dps8_ins.c rA 9581 src/dps8/dps8_ins.c rA 9586 src/dps8/dps8_ins.c rA 9618 src/dps8/dps8_ins.c rA 9653 src/dps8/dps8_ins.c rA 9655 src/dps8/dps8_ins.c rA 9712 src/dps8/dps8_ins.c rA 77 src/dps8/dps8_math.c word72 Mant = convert_to_word72 (cpu.rA, cpu.rQ); rA 129 src/dps8/dps8_math.c word72 Mant = convert_to_word72 (cpu.rA, cpu.rQ); rA 295 src/dps8/dps8_math.c cpu . rA = 0; rA 338 src/dps8/dps8_math.c cpu . rA = (result >> 36) & MASK36; rA 485 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 678 src/dps8/dps8_math.c convert_to_word36 (m3, & cpu.rA, & cpu.rQ); rA 684 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); // Do this here instead of in Add72b because rA 686 src/dps8/dps8_math.c if (cpu.rA == 0 && cpu.rQ == 0) { rA 694 src/dps8/dps8_math.c fno_ext (cpup, & e3, & cpu.rE, & cpu.rA, & cpu.rQ); rA 1082 src/dps8/dps8_math.c word72 m = convert_to_word72 (cpu.rA, cpu.rQ); rA 1114 src/dps8/dps8_math.c convert_to_word36 (m, & cpu.rA, & cpu.rQ); rA 1115 src/dps8/dps8_math.c fno (cpup, & cpu.rE, & cpu.rA, & cpu.rQ); // normalize rA 1135 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 1149 src/dps8/dps8_math.c cpu.rA = 0; rA 1213 src/dps8/dps8_math.c convert_to_word36 (m3a, & cpu.rA, & cpu.rQ); rA 1218 src/dps8/dps8_math.c sim_debug (DBG_TRACEEXT, & cpu_dev, "fmp A %012"PRIo64" Q %012"PRIo64" E %03o\n", cpu.rA, cpu.rQ, cpu.rE); rA 1219 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 1221 src/dps8/dps8_math.c if (cpu.rA == 0 && cpu.rQ == 0) { rA 1229 src/dps8/dps8_math.c fno_ext (cpup, & e3, & cpu.rE, & cpu.rA, & cpu.rQ); rA 1276 src/dps8/dps8_math.c m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 1288 src/dps8/dps8_math.c m2 = convert_to_word72 (cpu.rA, cpu.rQ); rA 1323 src/dps8/dps8_math.c cpu.rA = 0; rA 1395 src/dps8/dps8_math.c convert_to_word36 (m1, & cpu.rA, & cpu.rQ); rA 1461 src/dps8/dps8_math.c cpu.rA = rshift_128 (m3, 36u).l & MASK36; rA 1463 src/dps8/dps8_math.c cpu.rA = (m3 >> 36) & MASK36; rA 1470 src/dps8/dps8_math.c SC_I_ZERO (cpu . rA == 0); rA 1471 src/dps8/dps8_math.c SC_I_NEG (cpu . rA & SIGN36); rA 1473 src/dps8/dps8_math.c if (cpu.rA == 0) // set to normalized 0 rA 1553 src/dps8/dps8_math.c word72 m = convert_to_word72 (cpu.rA, cpu.rQ); rA 1594 src/dps8/dps8_math.c convert_to_word36 (m, & cpu.rA, & cpu.rQ); rA 1596 src/dps8/dps8_math.c fno (cpup, & cpu.rE, & cpu.rA, & cpu.rQ); rA 1612 src/dps8/dps8_math.c word36 A = cpu . rA, Q = cpu . rQ; rA 1691 src/dps8/dps8_math.c word72 m1= lshift_128 (construct_128 (0, cpu.rA & 0777777777400), 36); rA 1693 src/dps8/dps8_math.c word72 m1 = ((word72)cpu.rA & 0777777777400LL) << 36; rA 1830 src/dps8/dps8_math.c word72 m1 = lshift_128 (construct_128 (0, cpu.rA & 0777777777400), 36); rA 1832 src/dps8/dps8_math.c word72 m1 = ((word72)cpu.rA & 0777777777400LL) << 36; rA 1996 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 2192 src/dps8/dps8_math.c convert_to_word36 (m3, & cpu.rA, & cpu.rQ); rA 2198 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); // Do this here instead of in Add72b because rA 2200 src/dps8/dps8_math.c if (cpu.rA == 0 && cpu.rQ == 0) { rA 2208 src/dps8/dps8_math.c fno_ext (cpup, & e3, & cpu.rE, & cpu.rA, & cpu.rQ); rA 2306 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 2335 src/dps8/dps8_math.c cpu.rA = 0; rA 2417 src/dps8/dps8_math.c convert_to_word36 (m3a, & cpu.rA, & cpu.rQ); rA 2423 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 2425 src/dps8/dps8_math.c if (cpu.rA == 0 && cpu.rQ == 0) { rA 2433 src/dps8/dps8_math.c fno_ext (cpup, & e3, & cpu.rE, & cpu.rA, & cpu.rQ); rA 2481 src/dps8/dps8_math.c m1 = convert_to_word72 (cpu.rA, cpu.rQ); rA 2495 src/dps8/dps8_math.c m2 = convert_to_word72 (cpu.rA, cpu.rQ); rA 2541 src/dps8/dps8_math.c cpu.rA = 0; rA 2612 src/dps8/dps8_math.c convert_to_word36 (m1, & cpu.rA, & cpu.rQ); rA 2666 src/dps8/dps8_math.c convert_to_word36 (m3, & cpu.rA, & cpu.rQ); rA 2672 src/dps8/dps8_math.c SC_I_ZERO (cpu.rA == 0 && cpu . rQ == 0); rA 2673 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 2675 src/dps8/dps8_math.c if (cpu.rA == 0 && cpu.rQ == 0) // set to normalized 0 rA 2797 src/dps8/dps8_math.c bool dividendNegative = (getbits36_1 (cpu.rA, 0) != 0); rA 2805 src/dps8/dps8_math.c uint128 zFrac = (((uint128) (cpu.rA & MASK35)) << 35) | ((cpu.rQ >> 1) & MASK35); rA 2843 src/dps8/dps8_math.c cpu.rA = (zFrac >> 35) & MASK35; rA 2847 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 2890 src/dps8/dps8_math.c SC_I_ZERO (cpu.rA == 0); rA 2891 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 2897 src/dps8/dps8_math.c cpu.rA = quot & MASK36; rA 2913 src/dps8/dps8_math.c rA 2915 src/dps8/dps8_math.c rA 2930 src/dps8/dps8_math.c bool dividendNegative = (getbits36_1 (cpu . rA, 0) != 0); rA 2939 src/dps8/dps8_math.c uint128 zFrac = lshift_128 (construct_128 (0, cpu.rA & MASK35), 35); rA 2943 src/dps8/dps8_math.c uint128 zFrac = ((uint128) (cpu . rA & MASK35) << 35) | ((cpu . rQ >> 1) & MASK35); rA 3029 src/dps8/dps8_math.c SC_I_NEG (cpu.rA & SIGN36); rA 3066 src/dps8/dps8_math.c bool Aneg = (cpu.rA & SIGN36) != 0; // blood type rA 3067 src/dps8/dps8_math.c bool AQzero = cpu.rA == 0 && cpu.rQ == 0; rA 3068 src/dps8/dps8_math.c if (cpu.rA & SIGN36) rA 3070 src/dps8/dps8_math.c cpu.rA = (~cpu.rA) & MASK36; rA 3076 src/dps8/dps8_math.c cpu.rA = (cpu.rA + 1) & MASK36; rA 3080 src/dps8/dps8_math.c rA 3082 src/dps8/dps8_math.c rA 3122 src/dps8/dps8_math.c cpu.rA = quot.l & MASK36; rA 3125 src/dps8/dps8_math.c cpu . rA = quot & MASK36; rA 3135 src/dps8/dps8_math.c SC_I_ZERO (cpu . rA == 0 && cpu . rQ == 0); rA 3136 src/dps8/dps8_math.c SC_I_NEG (cpu . rA & SIGN36); rA 3164 src/dps8/dps8_math.c float72 m = convert_to_word72 (cpu.rA, cpu.rQ); rA 3205 src/dps8/dps8_math.c convert_to_word36 (m, & cpu.rA, & cpu.rQ); rA 3207 src/dps8/dps8_math.c fno (cpup, & cpu.rE, & cpu.rA, & cpu.rQ); rA 3238 src/dps8/dps8_math.c word36 A = cpu . rA, Q = cpu . rQ; rA 3328 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA, cpu.rQ & 0777777777400LL); rA 3463 src/dps8/dps8_math.c word72 m1 = convert_to_word72 (cpu.rA & MASK36, cpu.rQ & 0777777777400LL); rA 1840 src/dps8/dps8_scu.c word16 b0_15 = (word16) getbits36_16 (cpu.rA, 20); rA 2114 src/dps8/dps8_scu.c cpu.rA = (clk >> 36) & 0177777; // upper 16-bits of clock rA 3378 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 3416 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 3432 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 4063 src/dps8/dps8_sys.c { "cpus[].rA", SYM_STRUCT_OFFSET, SYM_UINT64_36, offsetof (cpu_state_t, rA) }, rA 80 src/dps8/hdbg.h # define HDBGRegAR(c) hdbgRegR (hreg_A, cpu.rA, c) rA 81 src/dps8/hdbg.h # define HDBGRegAW(c) hdbgRegW (hreg_A, cpu.rA, c) rA 727 src/dps8/panelScraper.c SETL (bank_d, 0+3, cpu.rA, 36); rA 753 src/dps8/panelScraper.c SETL (bank_d, 8+3, cpu.rA >> 8, 36 - 8); rA 754 src/dps8/panelScraper.c SETL (bank_e, 0+3, cpu.rA, 8);