exponent 312 src/decNumber/decNumber.c if (dn->bits&DECSPECIAL || dn->digits>10 || dn->exponent!=0) ; // bad exponent 344 src/decNumber/decNumber.c if (dn->bits&DECSPECIAL || dn->digits>10 || dn->exponent!=0 exponent 414 src/decNumber/decNumber.c Int exponent=0; // working exponent [assume 0] exponent 527 src/decNumber/decNumber.c exponent=X10(exponent)+(Int)*c-(Int)'0'; exponent 536 src/decNumber/decNumber.c if (c>firstexp+9+1 || *firstexp>'1') exponent=DECNUMMAXE*2; exponent 539 src/decNumber/decNumber.c if (nege) exponent=-exponent; // was negative exponent 564 src/decNumber/decNumber.c exponent-=(last-dotchar); // adjust exponent exponent 611 src/decNumber/decNumber.c dn->exponent=exponent; exponent 623 src/decNumber/decNumber.c if ((dn->exponent-1<set->emin-dn->digits) exponent 624 src/decNumber/decNumber.c || (dn->exponent-1>set->emax-set->digits)) { exponent 662 src/decNumber/decNumber.c dzero.exponent=rhs->exponent; // [no coefficient expansion] exponent 711 src/decNumber/decNumber.c if (lhs->exponent!=0 || decNumberIsSpecial(lhs) || decNumberIsNegative(lhs) exponent 712 src/decNumber/decNumber.c || rhs->exponent!=0 || decNumberIsSpecial(rhs) || decNumberIsNegative(rhs)) { exponent 752 src/decNumber/decNumber.c res->exponent=0; // integer exponent 1077 src/decNumber/decNumber.c if (rhs->exponent!=0 || decNumberIsSpecial(rhs) || decNumberIsNegative(rhs)) { exponent 1108 src/decNumber/decNumber.c res->exponent=0; // integer exponent 1213 src/decNumber/decNumber.c Int ae=rhs->exponent+rhs->digits-1; // adjusted exponent exponent 1321 src/decNumber/decNumber.c decNumberFromInt32(w, w->exponent); exponent 1493 src/decNumber/decNumber.c dzero.exponent=rhs->exponent; // [no coefficient expansion] exponent 1533 src/decNumber/decNumber.c dtiny.exponent=set->emin-set->digits; exponent 1575 src/decNumber/decNumber.c dtiny.exponent=set->emin-set->digits; exponent 1634 src/decNumber/decNumber.c dtiny.exponent=DEC_MIN_EMIN-1; // .. smaller than tiniest exponent 1668 src/decNumber/decNumber.c if (lhs->exponent!=0 || decNumberIsSpecial(lhs) || decNumberIsNegative(lhs) exponent 1669 src/decNumber/decNumber.c || rhs->exponent!=0 || decNumberIsSpecial(rhs) || decNumberIsNegative(rhs)) { exponent 1707 src/decNumber/decNumber.c res->exponent=0; // integer exponent 1734 src/decNumber/decNumber.c dzero.exponent=rhs->exponent; // [no coefficient expansion] exponent 1856 src/decNumber/decNumber.c res->exponent=-shift; // make 1.0000... exponent 1963 src/decNumber/decNumber.c aset.digits=reqdigits+(rhs->digits+rhs->exponent)+2; exponent 1999 src/decNumber/decNumber.c dac->exponent=-shift; // make 1.0000... exponent 2299 src/decNumber/decNumber.c else if (decNumberIsInfinite(rhs) || rhs->exponent!=0) exponent 2417 src/decNumber/decNumber.c else if (lhs->exponent==rhs->exponent) ret=1; exponent 2449 src/decNumber/decNumber.c else if (decNumberIsInfinite(rhs) || rhs->exponent!=0) exponent 2463 src/decNumber/decNumber.c Int exp=res->exponent; // save for overflow test exponent 2464 src/decNumber/decNumber.c res->exponent+=reqexp; // adjust the exponent exponent 2466 src/decNumber/decNumber.c && ((exp^res->exponent)<0)) { // .. but result had different exponent 2468 src/decNumber/decNumber.c if (exp<0) res->exponent=DEC_MIN_EMIN-DEC_MAX_DIGITS; exponent 2469 src/decNumber/decNumber.c else res->exponent=DEC_MAX_EMAX+1; exponent 2511 src/decNumber/decNumber.c else if (decNumberIsInfinite(rhs) || rhs->exponent!=0) exponent 2688 src/decNumber/decNumber.c ideal=(rhs->exponent&~1)/2; // target exponent 2693 src/decNumber/decNumber.c res->exponent=ideal; // use the ideal [safe] exponent 2738 src/decNumber/decNumber.c exp=f->exponent+f->digits; // adjusted to Hull rules exponent 2739 src/decNumber/decNumber.c f->exponent=-(f->digits); // to range exponent 2755 src/decNumber/decNumber.c t->exponent=-3; exponent 2756 src/decNumber/decNumber.c a->exponent=-3; exponent 2770 src/decNumber/decNumber.c f->exponent--; // f=f/10 exponent 2772 src/decNumber/decNumber.c t->exponent=-4; exponent 2773 src/decNumber/decNumber.c a->exponent=-2; exponent 2795 src/decNumber/decNumber.c t->exponent=-1; // .. exponent 2813 src/decNumber/decNumber.c a->exponent+=exp/2; // set correct exponent exponent 2831 src/decNumber/decNumber.c a->exponent-=exp/2; // back to 0.1->1 exponent 2839 src/decNumber/decNumber.c t->exponent=-a->digits-1; // make 0.5 ulp exponent 2846 src/decNumber/decNumber.c t->exponent++; // make 1.0 ulp exponent 2860 src/decNumber/decNumber.c t->exponent++; // make 1.0 ulp exponent 2873 src/decNumber/decNumber.c a->exponent+=exp/2; // set correct exponent exponent 2899 src/decNumber/decNumber.c Int todrop=ideal-a->exponent; // most that can be dropped exponent 2904 src/decNumber/decNumber.c Int maxdrop=maxexp-a->exponent; exponent 2915 src/decNumber/decNumber.c a->exponent+=todrop; // maintain numerical value exponent 2926 src/decNumber/decNumber.c Int ae=rhs->exponent+rhs->digits-1; // adjusted exponent exponent 3005 src/decNumber/decNumber.c if (rhs->exponent>=0) return decNumberCopy(res, rhs); exponent 3051 src/decNumber/decNumber.c if (lhs->exponent!=0 || decNumberIsSpecial(lhs) || decNumberIsNegative(lhs) exponent 3052 src/decNumber/decNumber.c || rhs->exponent!=0 || decNumberIsSpecial(rhs) || decNumberIsNegative(rhs)) { exponent 3090 src/decNumber/decNumber.c res->exponent=0; // integer exponent 3167 src/decNumber/decNumber.c dest->exponent=src->exponent; exponent 3315 src/decNumber/decNumber.c ae=dn->exponent+dn->digits-1; // adjusted exponent exponent 3332 src/decNumber/decNumber.c ae=dn->exponent+dn->digits-1; // adjusted exponent exponent 3374 src/decNumber/decNumber.c dn->exponent=0; exponent 3399 src/decNumber/decNumber.c Int exp=dn->exponent; // local copy exponent 3641 src/decNumber/decNumber.c Int lexp=lhs->exponent; // save in case LHS==RES exponent 3651 src/decNumber/decNumber.c adjust=lexp-res->exponent; // adjustment needed [if -ve] exponent 3653 src/decNumber/decNumber.c if (adjust<0) res->exponent=lexp; // set exponent exponent 3667 src/decNumber/decNumber.c res->exponent+=adjust; // set the exponent. exponent 3678 src/decNumber/decNumber.c Int rexp=rhs->exponent; // save in case RHS==RES exponent 3688 src/decNumber/decNumber.c adjust=rexp-res->exponent; // adjustment needed [if -ve] exponent 3695 src/decNumber/decNumber.c res->exponent+=adjust; // set the exponent. exponent 3707 src/decNumber/decNumber.c padding=rhs->exponent-lhs->exponent; exponent 3714 src/decNumber/decNumber.c && rhs->exponent>=set->emin // [some normals drop through] exponent 3715 src/decNumber/decNumber.c && rhs->exponent<=set->emax-set->digits+1 // [could clamp] exponent 3754 src/decNumber/decNumber.c Int exponent; // new exponent of LHS (if adjusted) exponent 3762 src/decNumber/decNumber.c exponent = rhs->exponent-1; exponent 3763 src/decNumber/decNumber.c exponent += (rhs->digits>reqdigits) ? 0 : rhs->digits-reqdigits-1; exponent 3764 src/decNumber/decNumber.c if (lhs->digits+lhs->exponent-1 < exponent) { exponent 3767 src/decNumber/decNumber.c dtiny.exponent=exponent; exponent 3771 src/decNumber/decNumber.c padding=rhs->exponent-exponent; exponent 3808 src/decNumber/decNumber.c res->exponent=lhs->exponent; // .. operands (even if aliased) exponent 3996 src/decNumber/decNumber.c Int exponent; // working exponent exponent 4057 src/decNumber/decNumber.c res->exponent=set->emin-set->digits+1; exponent 4089 src/decNumber/decNumber.c exponent=lhs->exponent-rhs->exponent; // ideal exponent exponent 4092 src/decNumber/decNumber.c res->exponent=exponent; // exponent, too exponent 4099 src/decNumber/decNumber.c exponent=rhs->exponent; // [save in case overwrite] exponent 4101 src/decNumber/decNumber.c if (exponent<res->exponent) res->exponent=exponent; // use lower exponent 4114 src/decNumber/decNumber.c exponent=(lhs->exponent+lhs->digits)-(rhs->exponent+rhs->digits); exponent 4119 src/decNumber/decNumber.c if (exponent<0 && !(op==DIVIDE)) { exponent 4129 src/decNumber/decNumber.c if (lhs->exponent<=rhs->exponent) { exponent 4130 src/decNumber/decNumber.c if (op&REMAINDER || exponent<-1) { exponent 4212 src/decNumber/decNumber.c for (pow=&powers[1]; *msu1>=*pow; pow++) exponent--; exponent 4213 src/decNumber/decNumber.c for (pow=&powers[1]; *msu2>=*pow; pow++) exponent++; exponent 4225 src/decNumber/decNumber.c if (exponent<0) cut=-exponent; exponent 4226 src/decNumber/decNumber.c else cut=DECDPUN-exponent%DECDPUN; exponent 4228 src/decNumber/decNumber.c exponent+=cut; // maintain numerical value exponent 4234 src/decNumber/decNumber.c maxexponent=lhs->exponent-rhs->exponent; // save exponent 4239 src/decNumber/decNumber.c exponent-=DECDPUN; // update the exponent exponent 4324 src/decNumber/decNumber.c if ((op&DIVIDE) && (exponent<=maxexponent)) break; exponent 4329 src/decNumber/decNumber.c if (exponent==0 && !(op&DIVIDE)) break; exponent 4334 src/decNumber/decNumber.c exponent-=DECDPUN; // update the exponent exponent 4365 src/decNumber/decNumber.c if (exponent>=maxexponent) break; // don't chop real 0s exponent 4372 src/decNumber/decNumber.c exponent++; exponent 4387 src/decNumber/decNumber.c if (accdigits+exponent>reqdigits) { exponent 4404 src/decNumber/decNumber.c Int exp=lhs->exponent; // save min(exponents) exponent 4405 src/decNumber/decNumber.c if (rhs->exponent<exp) exp=rhs->exponent; exponent 4410 src/decNumber/decNumber.c res->exponent=exp; // .. with proper exponent exponent 4424 src/decNumber/decNumber.c postshift=var1initpad+exponent-lhs->exponent+rhs->exponent; exponent 4434 src/decNumber/decNumber.c exponent=lhs->exponent; // exponent is smaller of lhs & rhs exponent 4435 src/decNumber/decNumber.c if (rhs->exponent<exponent) exponent=rhs->exponent; exponent 4454 src/decNumber/decNumber.c rhs->exponent-exponent); exponent 4495 src/decNumber/decNumber.c exp=rhs->exponent-exponent; // RHS padding needed exponent 4514 src/decNumber/decNumber.c res->exponent=exponent; exponent 4578 src/decNumber/decNumber.c Int exponent; // work exponent 4855 src/decNumber/decNumber.c exponent=lhs->exponent+rhs->exponent; // calculate exponent exponent 4856 src/decNumber/decNumber.c if (lhs->exponent<0 && rhs->exponent<0 && exponent>0) exponent 4857 src/decNumber/decNumber.c exponent=-2*DECNUMMAXE; // force underflow exponent 4858 src/decNumber/decNumber.c res->exponent=exponent; // OK to overwrite now exponent 5022 src/decNumber/decNumber.c d->exponent=-set->digits; // * 10**(-d) exponent 5023 src/decNumber/decNumber.c if (decNumberIsNegative(rhs)) d->exponent--; // negative case exponent 5033 src/decNumber/decNumber.c res->exponent=-shift; // make 1.0000... exponent 5047 src/decNumber/decNumber.c h=rhs->exponent+rhs->digits; exponent 5059 src/decNumber/decNumber.c if (decNumberIsNegative(rhs)) a->exponent=-2; // make 0.02 exponent 5083 src/decNumber/decNumber.c if (rhs->exponent!=use) { exponent 5094 src/decNumber/decNumber.c newrhs->exponent=use; // normalize; now <1 exponent 5164 src/decNumber/decNumber.c if (((a->digits+a->exponent)>=(t->digits+t->exponent+p+1)) exponent 5347 src/decNumber/decNumber.c if (rhs->exponent==0 && set->digits<=40) { exponent 5407 src/decNumber/decNumber.c r=rhs->exponent+rhs->digits; // 'normalised' exponent exponent 5410 src/decNumber/decNumber.c b->exponent=-6; // .. exponent 5417 src/decNumber/decNumber.c b->exponent=0; // make integer exponent 5427 src/decNumber/decNumber.c b->exponent=-(t&3)-3; // set exponent exponent 5480 src/decNumber/decNumber.c (a->digits+a->exponent)>=(b->digits+b->exponent+set->digits+1)) { exponent 5484 src/decNumber/decNumber.c if (cmp.lsu[0]==0) a->exponent=0; // yes, exact 0 exponent 5489 src/decNumber/decNumber.c if (decNumberIsZero(b)) b->exponent=a->exponent-p; exponent 5583 src/decNumber/decNumber.c if (quant) reqexp=inrhs->exponent; // quantize -- match exponents exponent 5605 src/decNumber/decNumber.c res->exponent=reqexp; // .. just set exponent exponent 5611 src/decNumber/decNumber.c Int adjust=reqexp-lhs->exponent; // digit adjustment needed exponent 5630 src/decNumber/decNumber.c if (res->exponent>reqexp) { exponent 5639 src/decNumber/decNumber.c res->exponent--; // (re)adjust the exponent. exponent 5653 src/decNumber/decNumber.c res->exponent+=adjust; // adjust the exponent exponent 5660 src/decNumber/decNumber.c if (res->exponent>set->emax-res->digits+1) { // too big exponent 5802 src/decNumber/decNumber.c if (lhs->exponent!=rhs->exponent) { exponent 5803 src/decNumber/decNumber.c if (lhs->exponent<rhs->exponent) result=-1; exponent 5836 src/decNumber/decNumber.c if (lhs->exponent<rhs->exponent) result=+1; exponent 5841 src/decNumber/decNumber.c if (lhs->exponent>rhs->exponent) result=+1; exponent 5906 src/decNumber/decNumber.c if (lhs->exponent>rhs->exponent) { // LHS exponent larger exponent 5915 src/decNumber/decNumber.c rhs->exponent-lhs->exponent); exponent 6297 src/decNumber/decNumber.c dn->exponent=0; // (sign is preserved) exponent 6302 src/decNumber/decNumber.c exp=dn->exponent; exponent 6331 src/decNumber/decNumber.c Int maxd=set->emax-set->digits+1-dn->exponent; exponent 6338 src/decNumber/decNumber.c dn->exponent+=d; // maintain numerical value exponent 6538 src/decNumber/decNumber.c dest->exponent=src->exponent; exponent 6608 src/decNumber/decNumber.c dn->exponent+=discard; // maintain numerical value exponent 6855 src/decNumber/decNumber.c dn->exponent++; // and bump exponent exponent 6857 src/decNumber/decNumber.c if ((dn->exponent+dn->digits)>set->emax+1) { exponent 6881 src/decNumber/decNumber.c dn->exponent--; // and bump exponent exponent 6886 src/decNumber/decNumber.c if (dn->exponent+1==set->emin-set->digits+1) { //-V584 exponent 6892 src/decNumber/decNumber.c dn->exponent++; exponent 6930 src/decNumber/decNumber.c dn->exponent=0; // clean exponent .. exponent 6934 src/decNumber/decNumber.c if (dn->exponent>=0) { // non-negative exponent exponent 6936 src/decNumber/decNumber.c if (set->digits >= (dn->exponent+dn->digits)) { exponent 6937 src/decNumber/decNumber.c dn->digits=decShiftToMost(dn->lsu, dn->digits, dn->exponent); exponent 6938 src/decNumber/decNumber.c dn->exponent=0; exponent 6972 src/decNumber/decNumber.c if (dn->exponent<=tinyexp) { // prefilter exponent 6976 src/decNumber/decNumber.c if (dn->exponent<tinyexp) { exponent 6984 src/decNumber/decNumber.c nmin.exponent=set->emin; exponent 7001 src/decNumber/decNumber.c if (dn->exponent<=set->emax-set->digits+1) return; // neither needed exponent 7004 src/decNumber/decNumber.c if (dn->exponent>set->emax-dn->digits+1) { // too big exponent 7012 src/decNumber/decNumber.c shift=dn->exponent-(set->emax-set->digits+1); exponent 7018 src/decNumber/decNumber.c dn->exponent-=shift; // adjust the exponent to match exponent 7041 src/decNumber/decNumber.c if (dn->exponent>emax) { // clamp required exponent 7042 src/decNumber/decNumber.c dn->exponent=emax; exponent 7094 src/decNumber/decNumber.c dn->exponent=set->emax-set->digits+1; exponent 7135 src/decNumber/decNumber.c if (dn->exponent<etiny) { // clamp required exponent 7136 src/decNumber/decNumber.c dn->exponent=etiny; exponent 7143 src/decNumber/decNumber.c adjust=etiny-dn->exponent; // calculate digits to remove exponent 7167 src/decNumber/decNumber.c if (dn->exponent>etiny) { exponent 7169 src/decNumber/decNumber.c dn->exponent--; // (re)adjust the exponent. exponent 7201 src/decNumber/decNumber.c || rhs->exponent+rhs->digits>DEC_MAX_MATH+1 exponent 7202 src/decNumber/decNumber.c || rhs->exponent+rhs->digits<2*(1-DEC_MAX_MATH)) exponent 7226 src/decNumber/decNumber.c Int ilength=dn->digits+dn->exponent; // integral length exponent 7241 src/decNumber/decNumber.c if (dn->exponent>=0) { // relatively easy exponent 7243 src/decNumber/decNumber.c got=dn->exponent; exponent 7246 src/decNumber/decNumber.c Int count=-dn->exponent; // digits to discard exponent 7398 src/decNumber/decNumber.c res->exponent=0; // clean exponent exponent 72 src/decNumber/decNumber.h int32_t exponent; /* Unadjusted exponent, unbiased, in */ exponent 344 src/decNumber/decNumberLocal.h Int exponent; /* Unadjusted signed exponent (q), or */ exponent 352 src/decNumber/decNumberLocal.h # define NUMISSPECIAL(num) (EXPISSPECIAL((num)->exponent)) exponent 614 src/dps8/dps8_cpu.h int exponent; // For decimal floating-point (evil) exponent 127 src/dps8/dps8_decimal.c dn->exponent=-scale; // set the exponent exponent 240 src/dps8/dps8_decimal.c exponent 431 src/dps8/dps8_decimal.c exponent 475 src/dps8/dps8_decimal.c exponent 479 src/dps8/dps8_decimal.c exponent 494 src/dps8/dps8_decimal.c exponent 520 src/dps8/dps8_decimal.c exponent 730 src/dps8/dps8_decimal.c if (sf != r->exponent) { exponent 733 src/dps8/dps8_decimal.c if (sf > r->exponent) // ET 330: truncation due to: output sf > input sf or exponent exponent 750 src/dps8/dps8_decimal.c if (r->exponent > sf) exponent 751 src/dps8/dps8_decimal.c set->digits = min (DECNUMDIGITS, max (set->digits, r->digits + r->exponent - sf)); exponent 40 src/dps8/dps8_decimal.h sim_printf("%s:'%s E%d'\n", msg, getBCDn(dn, set->digits), dn->exponent); \ exponent 5077 src/dps8/dps8_eis.c e->exponent = 0; exponent 5129 src/dps8/dps8_eis.c e->exponent = (signed char)(c & 0377); // want to do a sign extend exponent 5134 src/dps8/dps8_eis.c e->exponent = (c & 0xf);// << 4; exponent 5135 src/dps8/dps8_eis.c e->exponent <<= 4; exponent 5140 src/dps8/dps8_eis.c e->exponent |= (c & 0xf); exponent 5142 src/dps8/dps8_eis.c signed char ce = (signed char) (e->exponent & 0xff); exponent 5143 src/dps8/dps8_eis.c e->exponent = ce; exponent 7489 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 7497 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 7817 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 7819 src/dps8/dps8_eis.c op1->exponent = 127; exponent 7923 src/dps8/dps8_eis.c (op1->exponent >> 4) & 0xf); // upper 4-bits exponent 7925 src/dps8/dps8_eis.c op1->exponent & 0xf); // lower 4-bits exponent 7929 src/dps8/dps8_eis.c op1->exponent & 0xff); // write 8-bit exponent exponent 7942 src/dps8/dps8_eis.c if (op1->exponent > 127) exponent 7947 src/dps8/dps8_eis.c if (op1->exponent < -128) exponent 10092 src/dps8/dps8_eis.c exponent 10306 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 10314 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 10324 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 10361 src/dps8/dps8_eis.c op3->exponent = 127; exponent 10439 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 10440 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 10443 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 10456 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 10461 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 10687 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 10695 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 10715 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 10752 src/dps8/dps8_eis.c op3->exponent = 127; exponent 10830 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 10831 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 10835 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 10848 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 10853 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11018 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11026 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11036 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 11073 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11151 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11152 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11156 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11169 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11174 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11359 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11367 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11377 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 11414 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11490 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11491 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11495 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11508 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11513 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11675 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11683 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11693 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11769 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11770 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11774 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11787 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11792 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11977 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11985 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 12006 src/dps8/dps8_eis.c op3->exponent = 127; exponent 12083 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 12084 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 12087 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 12100 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 12105 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 12176 src/dps8/dps8_eis.c exponent 12305 src/dps8/dps8_eis.c exponent 12435 src/dps8/dps8_eis.c exponent 12436 src/dps8/dps8_eis.c exponent 12505 src/dps8/dps8_eis.c exponent 12549 src/dps8/dps8_eis.c exponent 12553 src/dps8/dps8_eis.c exponent 12570 src/dps8/dps8_eis.c exponent 12597 src/dps8/dps8_eis.c exponent 12649 src/dps8/dps8_eis.c exponent 12666 src/dps8/dps8_eis.c exponent 12803 src/dps8/dps8_eis.c exponent 13017 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 13034 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 13058 src/dps8/dps8_eis.c NQ = (n2-clz2+1) - (n1-clz1) + (-(e->S1==CSFL?op1->exponent:(int)e->SF1)); exponent 13061 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF2,NQ); exponent 13096 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n2 - op3->digits)); exponent 13132 src/dps8/dps8_eis.c _1a.exponent = 0; exponent 13133 src/dps8/dps8_eis.c _2a.exponent = 0; exponent 13138 src/dps8/dps8_eis.c op1->exponent,op2->exponent,op1->digits,op2->digits,_1a.digits,_2a.digits); exponent 13149 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv2d: addzero n2 %d %s exp %d\n",n2,res,op3->exponent); exponent 13160 src/dps8/dps8_eis.c op3->exponent = 127; exponent 13235 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 13236 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 13239 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 13252 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 13257 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 13443 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 13460 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 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); exponent 13504 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF3,NQ); exponent 13539 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n3 - op3->digits)); exponent 13575 src/dps8/dps8_eis.c _1a.exponent = 0; exponent 13576 src/dps8/dps8_eis.c _2a.exponent = 0; exponent 13582 src/dps8/dps8_eis.c op1->exponent ,op2->exponent, op1->digits, exponent 13594 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv3d: addzero n3 %d %s exp %d\n",n3,res,op3->exponent); exponent 13605 src/dps8/dps8_eis.c op3->exponent = 127; exponent 13682 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 13683 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 13686 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 13699 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 13704 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 238 src/dps8/dps8_math.c int exponent, bit; exponent 250 src/dps8/dps8_math.c exponent = 0; exponent 261 src/dps8/dps8_math.c exponent |= bit; exponent 276 src/dps8/dps8_math.c exponent |= bit; exponent 279 src/dps8/dps8_math.c exponent = -exponent; exponent 282 src/dps8/dps8_math.c *exp = exponent;