op2 7493 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 7495 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 7497 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 7500 src/dps8/dps8_eis.c decNumber *cmp = decNumberCompare(&_3, op1, op2, &set); // compare signed op1 :: op2 op2 7505 src/dps8/dps8_eis.c op2 = decNumberAbs(op2, op2, &set); op2 7508 src/dps8/dps8_eis.c decNumber *mcmp = decNumberCompare(&_3, op1, op2, &set); // compare signed op1 :: op2 op2 10310 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 10312 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 10314 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 10316 src/dps8/dps8_eis.c decNumber *op3 = decNumberAdd(&_3, op1, op2, &set); op2 10691 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 10693 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 10695 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 10697 src/dps8/dps8_eis.c decNumber *op3 = decNumberAdd(&_3, op1, op2, &set); op2 11022 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 11024 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 11026 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 11028 src/dps8/dps8_eis.c decNumber *op3 = decNumberSubtract(&_3, op2, op1, &set); op2 11363 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 11365 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 11367 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 11369 src/dps8/dps8_eis.c decNumber *op3 = decNumberSubtract(&_3, op2, op1, &set); op2 11679 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 11681 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 11683 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 11685 src/dps8/dps8_eis.c decNumber *op3 = decNumberMultiply(&_3, op1, op2, &set); op2 11981 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 11983 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 11985 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 11987 src/dps8/dps8_eis.c decNumber *op3 = decNumberMultiply(&_3, op1, op2, &set); op2 13030 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); // dividend op2 13032 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 13034 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 13050 src/dps8/dps8_eis.c for (i=0; i < op2->digits; i++) op2 13061 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF2,NQ); op2 13069 src/dps8/dps8_eis.c decNumber *op3 = decNumberDivide(&_3, op2, op1, &set); op2 13074 src/dps8/dps8_eis.c PRINTDEC("op2", op2); op2 13121 src/dps8/dps8_eis.c if (op1->digits >= op2->digits) { op2 13124 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op1->digits - op2->digits); op2 13125 src/dps8/dps8_eis.c decNumberShift(&_2a, op2, &_sf, &set); op2 13126 src/dps8/dps8_eis.c } else if (op1->digits < op2->digits) { op2 13128 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op2->digits - op1->digits); op2 13130 src/dps8/dps8_eis.c decNumberCopy(&_2a, op2); op2 13138 src/dps8/dps8_eis.c op1->exponent,op2->exponent,op1->digits,op2->digits,_1a.digits,_2a.digits); op2 13456 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); op2 13458 src/dps8/dps8_eis.c op2->bits |= DECNEG; op2 13460 src/dps8/dps8_eis.c op2->exponent = e->exponent; op2 13492 src/dps8/dps8_eis.c for (i=0; i < op2->digits; i++) op2 13501 src/dps8/dps8_eis.c ((e->S2==CSFL?op2->exponent:(int)e->SF2)-(e->S1==CSFL?op1->exponent:(int)e->SF1)-(int)e->SF3); op2 13504 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF3,NQ); op2 13512 src/dps8/dps8_eis.c decNumber *op3 = decNumberDivide(&_3, op2, op1, &set); op2 13517 src/dps8/dps8_eis.c PRINTDEC("op2", op2); op2 13564 src/dps8/dps8_eis.c if (op1->digits >= op2->digits) { op2 13567 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op1->digits - op2->digits); op2 13568 src/dps8/dps8_eis.c decNumberShift(&_2a, op2, &_sf, &set); op2 13569 src/dps8/dps8_eis.c } else if (op1->digits < op2->digits) { op2 13571 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op2->digits - op1->digits); op2 13573 src/dps8/dps8_eis.c decNumberCopy(&_2a, op2); op2 13582 src/dps8/dps8_eis.c op1->exponent ,op2->exponent, op1->digits, op2 13583 src/dps8/dps8_eis.c op2->digits, _1a.digits, _2a.digits); op2 280 src/dps8/dps8_utils.c word36 Add36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 285 src/dps8/dps8_utils.c op1, op2, carryin, flagsToSet, * flags); op2 291 src/dps8/dps8_utils.c word38 op2e = op2 & MASK36; op2 360 src/dps8/dps8_utils.c word36 Sub36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 373 src/dps8/dps8_utils.c word38 op2e = op2 & MASK36; op2 444 src/dps8/dps8_utils.c word18 Add18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 452 src/dps8/dps8_utils.c word20 op2e = op2 & MASK18; op2 520 src/dps8/dps8_utils.c word18 Sub18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 533 src/dps8/dps8_utils.c word20 op2e = op2 & MASK18; op2 604 src/dps8/dps8_utils.c word72 Add72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 613 src/dps8/dps8_utils.c word74 op2e = and_128 (op2, MASK72); op2 617 src/dps8/dps8_utils.c word74 op2e = op2 & MASK72; op2 718 src/dps8/dps8_utils.c word72 Sub72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf) op2 726 src/dps8/dps8_utils.c (word36) (rshift_128 (op2, 36).l & MASK36), op2 727 src/dps8/dps8_utils.c (word36) (op2.l & MASK36), op2 734 src/dps8/dps8_utils.c (word36) ((op2 >> 36) & MASK36), op2 735 src/dps8/dps8_utils.c (word36) (op2 & MASK36), op2 749 src/dps8/dps8_utils.c word74 op2e = and_128 (op2, MASK72); op2 752 src/dps8/dps8_utils.c word74 op2e = op2 & MASK72; op2 1097 src/dps8/dps8_utils.c t_int64 op2 = SIGNEXT36_64(oP2 & DMASK); op2 1100 src/dps8/dps8_utils.c word36 sign2 = (word36) op2 & SIGN36; op2 1107 src/dps8/dps8_utils.c if (op1 > op2) op2 1113 src/dps8/dps8_utils.c else if (op1 == op2) op2 1141 src/dps8/dps8_utils.c int32 op2 = SIGNEXT18_32 (oP2 & MASK18); op2 1144 src/dps8/dps8_utils.c word18 sign2 = (word18) op2 & SIGN18; op2 1151 src/dps8/dps8_utils.c if (op1 > op2) op2 1157 src/dps8/dps8_utils.c else if (op1 == op2) op2 1215 src/dps8/dps8_utils.c void cmp72(cpu_state_t * cpup, word72 op1, word72 op2, word18 *flags) op2 1223 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op2 %016"PRIx64"%016"PRIx64"\r\n", op2.h, op2.l); op2 1225 src/dps8/dps8_utils.c int128 op2s = SIGNEXT72_128 (and_128 (op2, MASK72)); op2 1230 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op2 %016"PRIx64"%016"PRIx64"\r\n", (uint64_t) (op2>>64), (uint64_t) op2); op2 1232 src/dps8/dps8_utils.c int128 op2s = SIGNEXT72_128 (op2 & MASK72); op2 1243 src/dps8/dps8_utils.c if (isnonzero_128 (and_128 (op2, SIGN72))) op2 1245 src/dps8/dps8_utils.c if (op2 & SIGN72) op2 59 src/dps8/dps8_utils.h void cmp36(cpu_state_t * cpup, word36 op1, word36 op2, word18 *flags); op2 61 src/dps8/dps8_utils.h void cmp18(cpu_state_t * cpup, word18 op1, word18 op2, word18 *flags); op2 62 src/dps8/dps8_utils.h void cmp72(cpu_state_t * cpup, word72 op1, word72 op2, word18 *flags); op2 890 src/dps8/dps8_utils.h word36 Add36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf); op2 891 src/dps8/dps8_utils.h word36 Sub36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf); op2 892 src/dps8/dps8_utils.h word18 Add18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf); op2 893 src/dps8/dps8_utils.h word18 Sub18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf); op2 894 src/dps8/dps8_utils.h word72 Add72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf); op2 895 src/dps8/dps8_utils.h word72 Sub72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);