op1              7485 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              7487 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              7489 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              7500 src/dps8/dps8_eis.c     decNumber *cmp = decNumberCompare(&_3, op1, op2, &set); // compare signed op1 :: op2
op1              7504 src/dps8/dps8_eis.c     op1 = decNumberAbs(op1, op1, &set);
op1              7508 src/dps8/dps8_eis.c     decNumber *mcmp = decNumberCompare(&_3, op1, op2, &set); // compare signed op1 :: op2
op1              7812 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber (e->inBuffer, n1, sc1, &_1);
op1              7815 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              7817 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              7818 src/dps8/dps8_eis.c     if (decNumberIsZero (op1))
op1              7819 src/dps8/dps8_eis.c         op1->exponent = 127;
op1              7823 src/dps8/dps8_eis.c         PRINTDEC ("mvn input (op1)", op1);
op1              7829 src/dps8/dps8_eis.c     char * res = formatDecimal (out, & set, op1, n2, (int) e->S2, e->SF2, R,
op1              7853 src/dps8/dps8_eis.c                                    (decNumberIsNegative (op1) &&
op1              7854 src/dps8/dps8_eis.c                                     ! decNumberIsZero(op1)) ? 015 : 013);
op1              7858 src/dps8/dps8_eis.c                                     (decNumberIsNegative (op1) &&
op1              7859 src/dps8/dps8_eis.c                                      ! decNumberIsZero (op1)) ? 015 : 014);
op1              7863 src/dps8/dps8_eis.c                                 (decNumberIsNegative (op1) &&
op1              7864 src/dps8/dps8_eis.c                                  ! decNumberIsZero (op1)) ? '-' : '+');
op1              7900 src/dps8/dps8_eis.c                                     (decNumberIsNegative (op1) &&
op1              7901 src/dps8/dps8_eis.c                                      ! decNumberIsZero(op1)) ? 015 :  013);
op1              7905 src/dps8/dps8_eis.c                                     (decNumberIsNegative (op1) &&
op1              7906 src/dps8/dps8_eis.c                                      ! decNumberIsZero (op1)) ? 015 :  014);
op1              7911 src/dps8/dps8_eis.c                                 (decNumberIsNegative (op1) &&
op1              7912 src/dps8/dps8_eis.c                                  ! decNumberIsZero(op1)) ? '-' : '+');
op1              7923 src/dps8/dps8_eis.c                                 (op1->exponent >> 4) & 0xf); // upper 4-bits
op1              7925 src/dps8/dps8_eis.c                                 op1->exponent       & 0xf); // lower 4-bits
op1              7929 src/dps8/dps8_eis.c                                  op1->exponent & 0xff); // write 8-bit exponent
op1              7942 src/dps8/dps8_eis.c         if (op1->exponent > 127)
op1              7947 src/dps8/dps8_eis.c         if (op1->exponent < -128)
op1              7954 src/dps8/dps8_eis.c sim_debug (DBG_CAC, & cpu_dev, "is neg %o\n", decNumberIsNegative(op1));
op1              7955 src/dps8/dps8_eis.c sim_debug (DBG_CAC, & cpu_dev, "is zero %o\n", decNumberIsZero(op1));
op1              7965 src/dps8/dps8_eis.c     SC_I_NEG (decNumberIsNegative(op1) && !decNumberIsZero(op1));
op1              7968 src/dps8/dps8_eis.c     SC_I_ZERO (decNumberIsZero(op1));
op1              9676 src/dps8/dps8_eis.c     decNumber *op1 = decNumberFromString(&_1, tmp+i, &set);
op1              9678 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              9683 src/dps8/dps8_eis.c     char * res = formatDecimal (out, &set, op1, n2, (int) e->S2, e->SF2, 0, &Ovr, &Trunc);
op1              9701 src/dps8/dps8_eis.c                                    (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? 015 : 013);  // special +
op1              9704 src/dps8/dps8_eis.c                                    (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? 015 : 014);  // default +
op1              9708 src/dps8/dps8_eis.c                                (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? '-' : '+');
op1              9741 src/dps8/dps8_eis.c                                    (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? 015 :  013);  // special +
op1              9744 src/dps8/dps8_eis.c                                    (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? 015 :  014);  // default +
op1              9749 src/dps8/dps8_eis.c                                (decNumberIsNegative(op1) && !decNumberIsZero(op1)) ? '-' : '+');
op1              9759 src/dps8/dps8_eis.c     SC_I_NEG (decNumberIsNegative(op1) && !decNumberIsZero(op1));  // set negative indicator if op3 < 0
op1              9760 src/dps8/dps8_eis.c     SC_I_ZERO (decNumberIsZero(op1));     // set zero indicator if op3 == 0
op1              10088 src/dps8/dps8_eis.c 
op1              10090 src/dps8/dps8_eis.c 
op1              10091 src/dps8/dps8_eis.c 
op1              10092 src/dps8/dps8_eis.c 
op1              10096 src/dps8/dps8_eis.c 
op1              10302 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              10304 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              10306 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              10316 src/dps8/dps8_eis.c     decNumber *op3 = decNumberAdd(&_3, op1, op2, &set);
op1              10683 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              10685 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              10687 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              10697 src/dps8/dps8_eis.c     decNumber *op3 = decNumberAdd(&_3, op1, op2, &set);
op1              11014 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              11016 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              11018 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              11028 src/dps8/dps8_eis.c     decNumber *op3 = decNumberSubtract(&_3, op2, op1, &set);
op1              11355 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              11357 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              11359 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              11369 src/dps8/dps8_eis.c     decNumber *op3 = decNumberSubtract(&_3, op2, op1, &set);
op1              11671 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              11673 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              11675 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              11685 src/dps8/dps8_eis.c     decNumber *op3 = decNumberMultiply(&_3, op1, op2, &set);
op1              11973 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              11975 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              11977 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              11987 src/dps8/dps8_eis.c     decNumber *op3 = decNumberMultiply(&_3, op1, op2, &set);
op1              13013 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);    // divisor
op1              13015 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              13017 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              13020 src/dps8/dps8_eis.c     if (decNumberIsZero(op1))
op1              13046 src/dps8/dps8_eis.c         for (i=0; i < op1->digits; i++)
op1              13058 src/dps8/dps8_eis.c         NQ = (n2-clz2+1) - (n1-clz1) + (-(e->S1==CSFL?op1->exponent:(int)e->SF1));
op1              13061 src/dps8/dps8_eis.c            e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF2,NQ);
op1              13069 src/dps8/dps8_eis.c     decNumber *op3 = decNumberDivide(&_3, op2, op1, &set);
op1              13075 src/dps8/dps8_eis.c     PRINTDEC("op1", op1);
op1              13121 src/dps8/dps8_eis.c         if (op1->digits >= op2->digits) {
op1              13123 src/dps8/dps8_eis.c             decNumberCopy(&_1a, op1);
op1              13124 src/dps8/dps8_eis.c             decNumberFromInt32(&_sf, op1->digits - op2->digits);
op1              13126 src/dps8/dps8_eis.c         } else if (op1->digits < op2->digits) {
op1              13128 src/dps8/dps8_eis.c             decNumberFromInt32(&_sf, op2->digits - op1->digits);
op1              13129 src/dps8/dps8_eis.c             decNumberShift(&_1a, op1, &_sf, &set);
op1              13138 src/dps8/dps8_eis.c                    op1->exponent,op2->exponent,op1->digits,op2->digits,_1a.digits,_2a.digits);
op1              13438 src/dps8/dps8_eis.c     decNumber *op1 = decBCD9ToNumber(e->inBuffer, n1, sc1, &_1);
op1              13441 src/dps8/dps8_eis.c         op1->bits |= DECNEG;
op1              13443 src/dps8/dps8_eis.c         op1->exponent = e->exponent;
op1              13446 src/dps8/dps8_eis.c     if (decNumberIsZero(op1))
op1              13488 src/dps8/dps8_eis.c         for (i=0; i < op1->digits; i++)
op1              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);
op1              13504 src/dps8/dps8_eis.c            e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF3,NQ);
op1              13512 src/dps8/dps8_eis.c     decNumber *op3 = decNumberDivide(&_3, op2, op1, &set);
op1              13518 src/dps8/dps8_eis.c     PRINTDEC("op1", op1);
op1              13564 src/dps8/dps8_eis.c         if (op1->digits >= op2->digits) {
op1              13566 src/dps8/dps8_eis.c             decNumberCopy(&_1a, op1);
op1              13567 src/dps8/dps8_eis.c             decNumberFromInt32(&_sf, op1->digits - op2->digits);
op1              13569 src/dps8/dps8_eis.c         } else if (op1->digits < op2->digits) {
op1              13571 src/dps8/dps8_eis.c             decNumberFromInt32(&_sf, op2->digits - op1->digits);
op1              13572 src/dps8/dps8_eis.c             decNumberShift(&_1a, op1, &_sf, &set);
op1              13582 src/dps8/dps8_eis.c                    op1->exponent ,op2->exponent, op1->digits,
op1               173 src/dps8/dps8_utils.c word36 Add36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               178 src/dps8/dps8_utils.c                op1, op2, carryin, flagsToSet, * flags);
op1               183 src/dps8/dps8_utils.c     word38 op1e = op1 & MASK36;
op1               253 src/dps8/dps8_utils.c word36 Sub36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               265 src/dps8/dps8_utils.c     word38 op1e = op1 & MASK36;
op1               337 src/dps8/dps8_utils.c word18 Add18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               344 src/dps8/dps8_utils.c     word20 op1e = op1 & MASK18;
op1               413 src/dps8/dps8_utils.c word18 Sub18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               425 src/dps8/dps8_utils.c     word20 op1e = op1 & MASK18;
op1               497 src/dps8/dps8_utils.c word72 Add72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               505 src/dps8/dps8_utils.c     word74 op1e = and_128 (op1, MASK72);
op1               509 src/dps8/dps8_utils.c     word74 op1e = op1 & MASK72;
op1               611 src/dps8/dps8_utils.c word72 Sub72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf)
op1               617 src/dps8/dps8_utils.c                (word36) ((rshift_128 (op1, 36).l) & MASK36),
op1               618 src/dps8/dps8_utils.c                (word36) (op1.l & MASK36),
op1               625 src/dps8/dps8_utils.c                (word36) ((op1 >> 36) & MASK36),
op1               626 src/dps8/dps8_utils.c                (word36) (op1 & MASK36),
op1               641 src/dps8/dps8_utils.c     word74 op1e = and_128 (op1, MASK72);
op1               644 src/dps8/dps8_utils.c     word74 op1e = op1 & MASK72;
op1               785 src/dps8/dps8_utils.c word36 compl36(cpu_state_t * cpup, word36 op1, word18 *flags, bool * ovf)
op1               790 src/dps8/dps8_utils.c     op1 &= DMASK;
op1               794 src/dps8/dps8_utils.c     word36 res = ((word36) (- ((word36s) op1))) & DMASK;
op1               796 src/dps8/dps8_utils.c     * ovf = op1 == MAXNEG;
op1               821 src/dps8/dps8_utils.c word18 compl18(cpu_state_t * cpup, word18 op1, word18 *flags, bool * ovf)
op1               826 src/dps8/dps8_utils.c     op1 &= MASK18;
op1               830 src/dps8/dps8_utils.c     word18 res = ((word18) (- (word18s) op1)) & MASK18;
op1               832 src/dps8/dps8_utils.c     * ovf = op1 == MAX18NEG;
op1               989 src/dps8/dps8_utils.c     t_int64 op1 = SIGNEXT36_64(oP1 & DMASK);
op1               992 src/dps8/dps8_utils.c     word36 sign1 = (word36) op1 & SIGN36;
op1              1000 src/dps8/dps8_utils.c          if (op1 > op2)
op1              1006 src/dps8/dps8_utils.c          else if (op1 == op2)
op1              1033 src/dps8/dps8_utils.c     int32 op1 = SIGNEXT18_32 (oP1 & MASK18);
op1              1036 src/dps8/dps8_utils.c     word18 sign1 = (word18) op1 & SIGN18;
op1              1044 src/dps8/dps8_utils.c         if (op1 > op2)
op1              1050 src/dps8/dps8_utils.c         else if (op1 == op2)
op1              1108 src/dps8/dps8_utils.c void cmp72(cpu_state_t * cpup, word72 op1, word72 op2, word18 *flags)
op1              1115 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op1 %016"PRIx64"%016"PRIx64"\n", op1.h, op1.l);
op1              1117 src/dps8/dps8_utils.c     int128 op1s =  SIGNEXT72_128 (and_128 (op1, MASK72));
op1              1122 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op1 %016"PRIx64"%016"PRIx64"\n", (uint64_t) (op1>>64), (uint64_t) op1);
op1              1124 src/dps8/dps8_utils.c     int128 op1s =  SIGNEXT72_128 (op1 & MASK72);
op1              1163 src/dps8/dps8_utils.c         if (isnonzero_128 (and_128 (op1, SIGN72)))
op1              1165 src/dps8/dps8_utils.c         if (op1 & SIGN72)
op1                50 src/dps8/dps8_utils.h word36 compl36(cpu_state_t * cpup, word36 op1, word18 *flags, bool * ovf);
op1                51 src/dps8/dps8_utils.h word18 compl18(cpu_state_t * cpup, word18 op1, word18 *flags, bool * ovf);
op1                59 src/dps8/dps8_utils.h void cmp36(cpu_state_t * cpup, word36 op1, word36 op2, word18 *flags);
op1                61 src/dps8/dps8_utils.h void cmp18(cpu_state_t * cpup, word18 op1, word18 op2, word18 *flags);
op1                62 src/dps8/dps8_utils.h void cmp72(cpu_state_t * cpup, word72 op1, word72 op2, word18 *flags);
op1               889 src/dps8/dps8_utils.h word36 Add36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);
op1               890 src/dps8/dps8_utils.h word36 Sub36b (cpu_state_t * cpup, word36 op1, word36 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);
op1               891 src/dps8/dps8_utils.h word18 Add18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);
op1               892 src/dps8/dps8_utils.h word18 Sub18b (cpu_state_t * cpup, word18 op1, word18 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);
op1               893 src/dps8/dps8_utils.h word72 Add72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);
op1               894 src/dps8/dps8_utils.h word72 Sub72b (cpu_state_t * cpup, word72 op1, word72 op2, word1 carryin, word18 flagsToSet, word18 * flags, bool * ovf);