rA 64 src/dps8/dps8_addrmods.c return GETHI (cpu.rA); rA 90 src/dps8/dps8_addrmods.c return GETLO (cpu.rA); rA 957 src/dps8/dps8_cpu.c cpu.rA = 0; rA 1580 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 2298 src/dps8/dps8_ins.c cpu.rA, cpu.rQ, dump_flags (buf, cpu.cu.IR)); rA 2301 src/dps8/dps8_ins.c cpu.rE, cpu.rA, cpu.rQ, EAQToIEEElongdouble (cpup)); rA 2304 src/dps8/dps8_ins.c cpu.rE, cpu.rA, cpu.rQ, EAQToIEEEdouble (cpup)); rA 2769 src/dps8/dps8_ins.c cpu.rA = cpu.CY; rA 2773 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 2774 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 2837 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 2855 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 2864 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3039 src/dps8/dps8_ins.c cmp36 (cpup, cpu.rA, cpu.CY, &cpu.cu.IR); rA 3063 src/dps8/dps8_ins.c word36 trZ = cpu.rA & cpu.CY; rA 3072 src/dps8/dps8_ins.c cpu.rA = cpu.Ypair[0]; rA 3080 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0) rA 3081 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3117 src/dps8/dps8_ins.c cpu.Ypair[0] = cpu.rA; rA 3166 src/dps8/dps8_ins.c capture = cpu.rA & barrelLeftMaskTable[cnt + 1]; rA 3169 src/dps8/dps8_ins.c cpu.rA <<= cnt; rA 3170 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 3176 src/dps8/dps8_ins.c capture = cpu.rA; rA 3177 src/dps8/dps8_ins.c cpu.rA = 0; rA 3188 src/dps8/dps8_ins.c word36 tmpSign = cpu.rA & SIGN36; rA 3193 src/dps8/dps8_ins.c cpu.rA <<= 1; rA 3194 src/dps8/dps8_ins.c if (tmpSign != (cpu.rA & SIGN36)) rA 3197 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 3203 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3204 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3319 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 3334 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 3347 src/dps8/dps8_ins.c cpu.rA = cpu.rA | cpu.CY; rA 3348 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 3353 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3354 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3423 src/dps8/dps8_ins.c cpu.rA = cpu.rA & cpu.CY; rA 3424 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 3428 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3429 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3442 src/dps8/dps8_ins.c cpu.rA = (cpu.CY & FLOAT36MASK) << 8; rA 3451 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3452 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3465 src/dps8/dps8_ins.c cpu.rA = cpu.TPR.TRR & MASK3; rA 3466 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.TPR.TSR & MASK15) << 18; rA 3477 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3568 src/dps8/dps8_ins.c cpu.rA = 0; rA 3569 src/dps8/dps8_ins.c SETHI (cpu.rA, cpu.TPR.CA); rA 3603 src/dps8/dps8_ins.c cpu.rA = compl36 (cpup, cpu.CY, & cpu.cu.IR, & ovf); rA 3652 src/dps8/dps8_ins.c cpu.rA = cpu.Ypair[0]; rA 3666 src/dps8/dps8_ins.c cpu.rA = 0; rA 3686 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 3692 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 3693 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3702 src/dps8/dps8_ins.c cpu.rA = cpu.CY; rA 3706 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 3707 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 3790 src/dps8/dps8_ins.c cpu.rA = cpu.Yblock8[4]; rA 3833 src/dps8/dps8_ins.c cpu.Yblock8[4] = cpu.rA; rA 3864 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3879 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3896 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 3954 src/dps8/dps8_ins.c cpu.CY = cpu.rA; rA 4082 src/dps8/dps8_ins.c word36 highA = cpu.rA & barrelLeftMaskTable[cnt]; rA 4083 src/dps8/dps8_ins.c cpu.rA <<= cnt; rA 4086 src/dps8/dps8_ins.c cpu.rA |= highA; rA 4087 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4092 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4093 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4095 src/dps8/dps8_ins.c cpu.rA |= 1; rA 4097 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4103 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4104 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4118 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4121 src/dps8/dps8_ins.c cpu.rA >>= tmp36; rA 4122 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4127 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4128 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4142 src/dps8/dps8_ins.c bool A0 = (cpu.rA & SIGN36) != 0; rA 4145 src/dps8/dps8_ins.c cpu.rA = A0 ? MASK36 : 0; rA 4148 src/dps8/dps8_ins.c cpu.rA >>= cnt; rA 4151 src/dps8/dps8_ins.c cpu.rA |= barrelLeftMaskTable[cnt]; rA 4153 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4156 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4158 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4161 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4164 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4166 src/dps8/dps8_ins.c cpu.rA |= SIGN36; rA 4168 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4174 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 4175 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4193 src/dps8/dps8_ins.c word36 tmp = cpu.rA; rA 4194 src/dps8/dps8_ins.c cpu.rA = cpu.rQ; rA 4197 src/dps8/dps8_ins.c word36 highA = cpu.rA & barrelLeftMaskTable[cnt]; rA 4198 src/dps8/dps8_ins.c word36 lowA = cpu.rA & BS_COMPL(barrelLeftMaskTable[cnt]); rA 4201 src/dps8/dps8_ins.c cpu.rA = (lowA << cnt) | (highQ >> (36 - cnt)); rA 4207 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4209 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4213 src/dps8/dps8_ins.c cpu.rA |= 1; // Q0 => A35 rA 4222 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4229 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4230 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4247 src/dps8/dps8_ins.c cpu.rA &= MASK36; rA 4254 src/dps8/dps8_ins.c bool allz = cpu.rA == 0 && cpu.rQ == 0; rA 4255 src/dps8/dps8_ins.c bool all1 = cpu.rA == MASK36 && cpu.rQ == MASK36; rA 4260 src/dps8/dps8_ins.c cpu.rA = 0; rA 4272 src/dps8/dps8_ins.c word36 captureA = cpu.rA; rA 4286 src/dps8/dps8_ins.c cpu.rA = (cpu.rQ << cnt36) & MASK36; rA 4295 src/dps8/dps8_ins.c word36 captureA = lmask & cpu.rA; rA 4305 src/dps8/dps8_ins.c cpu.rA = ((cpu.rA << cnt) & MASK36) | (cpu.rQ >> (36 - cnt)); rA 4314 src/dps8/dps8_ins.c rA 4322 src/dps8/dps8_ins.c rA 4335 src/dps8/dps8_ins.c rA 4339 src/dps8/dps8_ins.c rA 4342 src/dps8/dps8_ins.c rA 4354 src/dps8/dps8_ins.c word36 tmpSign = cpu.rA & SIGN36; rA 4357 src/dps8/dps8_ins.c cpu.rA <<= 1; // shift left 1 rA 4359 src/dps8/dps8_ins.c if (tmpSign != (cpu.rA & SIGN36)) rA 4364 src/dps8/dps8_ins.c cpu.rA |= 1; // Q0 => A35 rA 4369 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4377 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4378 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4393 src/dps8/dps8_ins.c cpu.rA = 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 4405 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4412 src/dps8/dps8_ins.c cpu.rQ = cpu.rA >> (cnt - 36); rA 4415 src/dps8/dps8_ins.c cpu.rA = 0; rA 4417 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4420 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4425 src/dps8/dps8_ins.c bool a35 = cpu.rA & 1; // A35 rA 4426 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4433 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4441 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4442 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4457 src/dps8/dps8_ins.c bool AQ0 = (cpu.rA & SIGN36) != 0; rA 4459 src/dps8/dps8_ins.c cpu.rA = cpu.rQ = AQ0 ? MASK36 : 0; rA 4466 src/dps8/dps8_ins.c word36 lowA = cpu.rA & barrelRightMaskTable[cnt]; rA 4468 src/dps8/dps8_ins.c cpu.rA >>= cnt; rA 4471 src/dps8/dps8_ins.c cpu.rA |= barrelLeftMaskTable[cnt]; rA 4473 src/dps8/dps8_ins.c cpu.rA &= BS_COMPL (barrelLeftMaskTable[cnt]); rA 4480 src/dps8/dps8_ins.c cpu.rQ = cpu.rA >> (cnt - 36); rA 4484 src/dps8/dps8_ins.c cpu.rA = MASK36; rA 4487 src/dps8/dps8_ins.c cpu.rA = 0; rA 4490 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 4494 src/dps8/dps8_ins.c cpu.rA &= DMASK; // Make sure the shifted in bits are 0 rA 4496 src/dps8/dps8_ins.c bool a0 = cpu.rA & SIGN36; // A0 rA 4500 src/dps8/dps8_ins.c bool a35 = cpu.rA & 1; // A35 rA 4502 src/dps8/dps8_ins.c cpu.rA >>= 1; // shift right 1 rA 4504 src/dps8/dps8_ins.c cpu.rA |= SIGN36; rA 4510 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits (probably ain't necessary) rA 4518 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 4519 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 4649 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNOC, & cpu.cu.IR, & ovf); rA 4667 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4669 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4688 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4690 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4713 src/dps8/dps8_ins.c tmp72 = Add72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), rA 4715 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4735 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNC, & cpu.cu.IR, & ovf); rA 4826 src/dps8/dps8_ins.c cpu.CY = Add36b (cpup, cpu.rA, cpu.CY, 0, I_ZNOC, rA 4880 src/dps8/dps8_ins.c cpu.rA = Add36b (cpup, cpu.rA, cpu.CY, TST_I_CARRY ? 1 : 0, rA 4919 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNOC, & cpu.cu.IR, & ovf); rA 4937 src/dps8/dps8_ins.c tmp72 = Sub72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), tmp72, 1, rA 4940 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 4958 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNC, & cpu.cu.IR, & ovf); rA 4981 src/dps8/dps8_ins.c tmp72 = Sub72b (cpup, convert_to_word72 (cpu.rA, cpu.rQ), tmp72, 1, rA 4983 src/dps8/dps8_ins.c convert_to_word36 (tmp72, & cpu.rA, & cpu.rQ); rA 5086 src/dps8/dps8_ins.c cpu.CY = Sub36b (cpup, cpu.rA, cpu.CY, 1, I_ZNOC, & cpu.cu.IR, & ovf); rA 5141 src/dps8/dps8_ins.c cpu.rA = Sub36b (cpup, cpu.rA, cpu.CY, TST_I_CARRY ? 1 : 0, rA 5188 src/dps8/dps8_ins.c word72 tmp72 = multiply_128 (SIGNEXT36_72 (cpu.rA), SIGNEXT36_72 (cpu.CY)); rA 5194 src/dps8/dps8_ins.c word72 tmp72 = (word72) (((word72s) SIGNEXT36_72 (cpu.rA)) * ((word72s) SIGNEXT36_72 (cpu.CY))); rA 5201 src/dps8/dps8_ins.c if (cpu.rA == MAXNEG && cpu.CY == MAXNEG) rA 5208 src/dps8/dps8_ins.c convert_to_word36 (tmp72, &cpu.rA, &cpu.rQ); rA 5213 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 5214 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5230 src/dps8/dps8_ins.c convert_to_word36 (cast_128 (prod), &cpu.rA, &cpu.rQ); rA 5237 src/dps8/dps8_ins.c convert_to_word36 ((word72)prod, &cpu.rA, &cpu.rQ); rA 5244 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 5245 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5281 src/dps8/dps8_ins.c cpu.rA = (cpu.rQ & SIGN36) ? 0 : SIGN36; // works for case 1,2 rA 5372 src/dps8/dps8_ins.c cpu.rA = (word36) remainder & DMASK; rA 5379 src/dps8/dps8_ins.c sim_debug (DBG_CAC, & cpu_dev, "rA (rem) %012"PRIo64"\n", cpu.rA); rA 5419 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5420 src/dps8/dps8_ins.c if (cpu.rA == 0400000000000ULL) rA 5429 src/dps8/dps8_ins.c cpu.rA = (word36) (- (word36s) cpu.rA); rA 5431 src/dps8/dps8_ins.c cpu.rA &= DMASK; // keep to 36-bits rA 5436 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 5437 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5448 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5451 src/dps8/dps8_ins.c if (cpu.rA == 0400000000000ULL && cpu.rQ == 0) rA 5458 src/dps8/dps8_ins.c word72 tmp72 = convert_to_word72 (cpu.rA, cpu.rQ); rA 5473 src/dps8/dps8_ins.c convert_to_word36 (tmp72, &cpu.rA, &cpu.rQ); rA 5496 src/dps8/dps8_ins.c t_int64 a = SIGNEXT36_64 (cpu.rA); rA 5533 src/dps8/dps8_ins.c word36 Z = ~cpu.rQ & (cpu.rA ^ cpu.CY); rA 5566 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 5611 src/dps8/dps8_ins.c cmp36wl (cpup, cpu.rA, cpu.CY, cpu.rQ, &cpu.cu.IR); rA 5663 src/dps8/dps8_ins.c cpu.CY = cpu.rA & cpu.CY; rA 5752 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 5766 src/dps8/dps8_ins.c convert_to_word36 (trAQ, &cpu.rA, &cpu.rQ); rA 5795 src/dps8/dps8_ins.c cpu.CY = cpu.rA | cpu.CY; rA 5872 src/dps8/dps8_ins.c cpu.rA = cpu.rA ^ cpu.CY; rA 5873 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 5878 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 5879 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 5905 src/dps8/dps8_ins.c cpu.CY = cpu.rA ^ cpu.CY; rA 5992 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 6059 src/dps8/dps8_ins.c word36 trZ = cpu.rA & ~cpu.CY; rA 6076 src/dps8/dps8_ins.c word72 trAQ = convert_to_word72 (cpu.rA, cpu.rQ); rA 6143 src/dps8/dps8_ins.c cpu.rA = (cpu.Ypair[0] & FLOAT36MASK) << 8; rA 6144 src/dps8/dps8_ins.c cpu.rA |= (cpu.Ypair[1] >> 28) & MASK8; rA 6153 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0 && cpu.rQ == 0); rA 6154 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 6172 src/dps8/dps8_ins.c ((cpu.rA & 0777777777400LLU) >> 8); rA 6173 src/dps8/dps8_ins.c cpu.Ypair[1] = ((cpu.rA & 0377) << 28) | rA 6191 src/dps8/dps8_ins.c cpu.rA &= DMASK; rA 6192 src/dps8/dps8_ins.c cpu.CY = ((word36)cpu.rE << 28) | (((cpu.rA >> 8) & 01777777777LL)); rA 6401 src/dps8/dps8_ins.c fno (cpup, & cpu.rE, & cpu.rA, & cpu.rQ); rA 7170 src/dps8/dps8_ins.c 040, & cpu.rA, & cpu.rQ); rA 7189 src/dps8/dps8_ins.c word72 big = convert_to_word72 (cpu.rA, cpu.rQ); rA 7412 src/dps8/dps8_ins.c word36 tmp1 = cpu.rA & SIGN36; // A0 rA 7413 src/dps8/dps8_ins.c word36 tmp36 = (cpu.rA << 3) & DMASK; rA 7438 src/dps8/dps8_ins.c cpu.rA = tmp36r & DMASK; // remainder -> C(A) rA 7443 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); // If C(A) = 0, then ON; rA 7454 src/dps8/dps8_ins.c word36 tmp = cpu.rA & MASK36; rA 7462 src/dps8/dps8_ins.c cpu.rA = tmp; rA 7467 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); // If C(A) = 0, then ON; rA 7469 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); // If C(A)0 = 1, then ON; rA 8129 src/dps8/dps8_ins.c & cpu.rA, & cpu.rQ); rA 8136 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8137 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 8206 src/dps8/dps8_ins.c & cpu.rA, & cpu.rQ); rA 8226 src/dps8/dps8_ins.c cpu.rA = PROM[cpu.TPR.CA & 1023]; rA 8234 src/dps8/dps8_ins.c cpu.rA = cpu.switches.data_switches; rA 8264 src/dps8/dps8_ins.c cpu.rA = 0; rA 8265 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [0] & 07LL) rA 8267 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [0] & 01LL) rA 8269 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [0] & 01LL) rA 8271 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [0] ? 1LL:0LL) rA 8273 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [0] & 07LL) rA 8276 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [1] & 07LL) rA 8278 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [1] & 01LL) rA 8280 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [1] & 01LL) rA 8282 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [1] ? 1LL:0LL) rA 8284 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [1] & 07LL) rA 8287 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [2] & 07LL) rA 8289 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [2] & 01LL) rA 8291 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [2] & 01LL) rA 8293 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [2] ? 1LL:0LL) rA 8295 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [2] & 07LL) rA 8298 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [3] & 07LL) rA 8300 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [3] & 01LL) rA 8302 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [3] & 01LL) rA 8304 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [3] ? 1LL:0LL) rA 8306 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [3] & 07LL) rA 8377 src/dps8/dps8_ins.c cpu.rA = 0; rA 8379 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[0] == 2 ? rA 8381 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[1] == 2 ? rA 8383 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[2] == 2 ? rA 8385 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.interlace[3] == 2 ? rA 8395 src/dps8/dps8_ins.c cpu.rA |= (word36) ((01L) /* 0b01 DPS8M */ rA 8397 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.FLT_BASE & 0177LL) rA 8399 src/dps8/dps8_ins.c DPS8M_ (cpu.rA |= (word36) ((01L) /* 0b1 ID_PROM installed */ rA 8416 src/dps8/dps8_ins.c cpu.rA |= (word36) ((01L) // 0b1 L68/DPS option: DPS rA 8422 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.enable_cache ? 1 : 0) rA 8427 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.procMode) /* 0b1 DPS8M */ rA 8429 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.procMode & 1U) rA 8437 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.options.proc_speed & 017LL) rA 8448 src/dps8/dps8_ins.c cpu.rA |= (word36) ((016L) // 0b1110 CPU ID rA 8451 src/dps8/dps8_ins.c cpu.rA |= (word36) ((cpu.switches.cpu_num & 07LL) rA 8457 src/dps8/dps8_ins.c cpu.rA = 0; rA 8487 src/dps8/dps8_ins.c cpu.rA = 0; rA 8488 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [4] & 07LL) rA 8490 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [4] & 01LL) rA 8492 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [4] & 01LL) rA 8494 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [4] ? 1LL:0LL) rA 8496 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [4] & 07LL) rA 8499 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [5] & 07LL) rA 8501 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [5] & 01LL) rA 8503 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [5] & 01LL) rA 8505 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [5] ? 1LL:0LL) rA 8507 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [5] & 07LL) rA 8510 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [6] & 07LL) rA 8512 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [6] & 01LL) rA 8514 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [6] & 01LL) rA 8516 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [6] ? 1LL:0LL) rA 8518 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [6] & 07LL) rA 8521 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.assignment [7] & 07LL) rA 8523 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.enable [7] & 01LL) rA 8525 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.init_enable [7] & 01LL) rA 8527 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [7] ? 1LL:0LL) rA 8529 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.store_size [7] & 07LL) rA 8549 src/dps8/dps8_ins.c cpu.rA = 0; rA 8550 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [0] == 2 ? rA 8552 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [1] == 2 ? rA 8554 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [2] == 2 ? rA 8556 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [3] == 2 ? rA 8559 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [4] == 2 ? rA 8561 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [5] == 2 ? rA 8563 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [6] == 2 ? rA 8565 src/dps8/dps8_ins.c cpu.rA |= (word36) (cpu.switches.interlace [7] == 2 ? rA 8579 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8580 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 8655 src/dps8/dps8_ins.c current_running_cpu_idx, cpu.rA, cpu.rQ); rA 8692 src/dps8/dps8_ins.c cpu_port_num, cpu.rA); rA 8721 src/dps8/dps8_ins.c cpu.rA, cpu.rQ); rA 8736 src/dps8/dps8_ins.c cpu.rA = result; rA 8740 src/dps8/dps8_ins.c SC_I_ZERO (cpu.rA == 0); rA 8741 src/dps8/dps8_ins.c SC_I_NEG (cpu.rA & SIGN36); rA 9686 src/dps8/dps8_ins.c rA 9689 src/dps8/dps8_ins.c rA 9696 src/dps8/dps8_ins.c rA 9705 src/dps8/dps8_ins.c rA 9717 src/dps8/dps8_ins.c rA 9723 src/dps8/dps8_ins.c rA 9728 src/dps8/dps8_ins.c rA 9760 src/dps8/dps8_ins.c rA 9795 src/dps8/dps8_ins.c rA 9797 src/dps8/dps8_ins.c rA 9854 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 1884 src/dps8/dps8_scu.c word16 b0_15 = (word16) getbits36_16 (cpu.rA, 20); rA 2158 src/dps8/dps8_scu.c cpu.rA = (clk >> 36) & 0177777; // upper 16-bits of clock rA 3383 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 3421 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 3437 src/dps8/dps8_sys.c sim_msg ("rA %012"PRIo64" (%llu)\n", rA, rA); rA 4068 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);