n2 7344 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 7385 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 7387 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 7389 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 7395 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 7400 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 7405 src/dps8/dps8_eis.c if (n2 < 1) n2 7426 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 7667 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0; n2 7716 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 7718 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 7720 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 7725 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 7729 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 7733 src/dps8/dps8_eis.c sim_debug (DBG_CAC, & cpu_dev, "n2 %d\n", n2); n2 7735 src/dps8/dps8_eis.c if (n2 < 1) n2 7763 src/dps8/dps8_eis.c char * res = formatDecimal (out, & set, op1, n2, (int) e->S2, e->SF2, R, n2 7809 src/dps8/dps8_eis.c for (int i = 0 ; i < n2 ; i ++) n2 9540 src/dps8/dps8_eis.c int n2 = 0; n2 9546 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 9550 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 9556 src/dps8/dps8_eis.c n2); n2 9558 src/dps8/dps8_eis.c if (n2 < 1) n2 9620 src/dps8/dps8_eis.c char * res = formatDecimal (out, &set, op1, n2, (int) e->S2, e->SF2, 0, &Ovr, &Trunc); n2 9651 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 10154 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 10195 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10197 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10199 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10205 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10210 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10215 src/dps8/dps8_eis.c if (n2 < 1) n2 10236 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10283 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 10322 src/dps8/dps8_eis.c for(int j = 0 ; j < n2 ; j++) n2 10503 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 10544 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10546 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10548 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10554 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10559 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10564 src/dps8/dps8_eis.c if (n2 < 1) n2 10607 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10848 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 10889 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 10891 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 10893 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 10899 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 10904 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 10909 src/dps8/dps8_eis.c if (n2 < 1) n2 10929 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 10976 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 11015 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 11156 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 11197 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11199 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11201 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11207 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11212 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11217 src/dps8/dps8_eis.c if (n2 < 1) n2 11261 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 11487 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 11528 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11530 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11532 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11538 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11543 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11548 src/dps8/dps8_eis.c if (n2 < 1) n2 11568 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 11579 src/dps8/dps8_eis.c char *res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 11614 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 11755 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 11796 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 11798 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 11800 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 11806 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 11811 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 11816 src/dps8/dps8_eis.c if (n2 < 1) n2 11860 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 12810 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, sc1 = 0, sc2 = 0; n2 12851 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 12853 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 12855 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 12861 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 12866 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 12871 src/dps8/dps8_eis.c if (n2 < 1) n2 12900 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); // dividend n2 12909 src/dps8/dps8_eis.c NQ = n2; n2 12928 src/dps8/dps8_eis.c NQ = (n2-clz2+1) - (n1-clz1) + (-(e->S1==CSFL?op1->exponent:(int)e->SF1)); n2 12962 src/dps8/dps8_eis.c if (n2 - op3->digits > 0) n2 12964 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n2 - op3->digits)); n2 13008 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2 -1, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13012 src/dps8/dps8_eis.c for (int i = n2; i > 0; i--) // incl.zero terminator n2 13015 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv2d: addzero n2 %d %s exp %d\n",n2,res,op3->exponent); n2 13018 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13022 src/dps8/dps8_eis.c res = formatDecimal(out, &set, op3, n2, (int) e->S2, e->SF2, R, &Ovr, &Trunc); n2 13057 src/dps8/dps8_eis.c for(int i = 0 ; i < n2 ; i++) n2 13199 src/dps8/dps8_eis.c int n1 = 0, n2 = 0, n3 = 0, sc1 = 0, sc2 = 0; n2 13240 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // need to account for the sign n2 13242 src/dps8/dps8_eis.c n2 -= 2; // 2 4-bit digit exponent n2 13244 src/dps8/dps8_eis.c n2 -= 1; // 1 9-bit digit exponent n2 13250 src/dps8/dps8_eis.c n2 = (int) e->N2 - 1; // 1 sign n2 13255 src/dps8/dps8_eis.c n2 = (int) e->N2; // no sign n2 13260 src/dps8/dps8_eis.c if (n2 < 1) n2 13312 src/dps8/dps8_eis.c decNumber *op2 = decBCD9ToNumber(e->inBuffer, n2, sc2, &_2); n2 13356 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);