n2 7345 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 7386 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 7388 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 7390 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 7396 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 7401 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 7406 src/dps8/dps8_eis.c if (n2 < 1) n2 7427 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 7668 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0; n2 7717 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 7719 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 7721 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 7726 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 7730 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 7734 src/dps8/dps8_eis.c sim_debug (DBG_CAC, & cpu_dev, "n2 %d\n", n2); n2 7736 src/dps8/dps8_eis.c if (n2 < 1) n2 7764 src/dps8/dps8_eis.c char * res = formatDecimal (out, & set, op1, n2, (int) e->S2, e->SF2, R, n2 7810 src/dps8/dps8_eis.c for (int i = 0 ; i < n2 ; i ++) n2 9541 src/dps8/dps8_eis.c int n2 = 0; n2 9547 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 9551 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 9557 src/dps8/dps8_eis.c n2); n2 9559 src/dps8/dps8_eis.c if (n2 < 1) n2 9621 src/dps8/dps8_eis.c char * res = formatDecimal (out, &set, op1, n2, (int) e->S2, e->SF2, 0, &Ovr, &Trunc); n2 9652 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 10155 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 10196 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10198 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10200 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10206 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10211 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10216 src/dps8/dps8_eis.c if (n2 < 1) n2 10237 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10284 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 10323 src/dps8/dps8_eis.c for(int j = 0 ; j < n2 ; j++) n2 10504 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 10545 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10547 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10549 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10555 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10560 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10565 src/dps8/dps8_eis.c if (n2 < 1) n2 10608 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10849 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 10890 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10892 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10894 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10900 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10905 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10910 src/dps8/dps8_eis.c if (n2 < 1) n2 10930 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10977 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 11016 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 11157 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 11198 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11200 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11202 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11208 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11213 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11218 src/dps8/dps8_eis.c if (n2 < 1) n2 11262 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 11488 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 11529 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11531 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11533 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11539 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11544 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11549 src/dps8/dps8_eis.c if (n2 < 1) n2 11569 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 11580 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 11615 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 11756 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 11797 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11799 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11801 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11807 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11812 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11817 src/dps8/dps8_eis.c if (n2 < 1) n2 11861 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 12811 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 12852 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 12854 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 12856 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 12862 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 12867 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 12872 src/dps8/dps8_eis.c if (n2 < 1) n2 12901 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); // dividend n2 12910 src/dps8/dps8_eis.c NQ = n2; n2 12929 src/dps8/dps8_eis.c NQ = (n2-clz2+1) - (n1-clz1) + (-(e->S1==CSFL?op1->exponent:(int)e->SF1)); n2 12963 src/dps8/dps8_eis.c if (n2 - op3->digits > 0) n2 12965 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n2 - op3->digits)); n2 13009 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2 -1, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13013 src/dps8/dps8_eis.c for (int i = n2; i > 0; i--) // incl.zero terminator n2 13016 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv2d: addzero n2 %d %s exp %d\n",n2,res,op3->exponent); n2 13019 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13023 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13058 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 13200 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 13241 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 13243 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 13245 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 13251 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 13256 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 13261 src/dps8/dps8_eis.c if (n2 < 1) n2 13313 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 13357 src/dps8/dps8_eis.c NQ = (n2-clz2+1) - (n1-clz1) + ((e->S2==CSFL?op2->exponent:(int)e->SF2)-(e->S1==CSFL?op1->exponent:(int)e->SF1)-(int)e->SF3);