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 611 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 7478 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 7486 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 7806 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 7808 src/dps8/dps8_eis.c op1->exponent = 127; exponent 7912 src/dps8/dps8_eis.c (op1->exponent >> 4) & 0xf); // upper 4-bits exponent 7914 src/dps8/dps8_eis.c op1->exponent & 0xf); // lower 4-bits exponent 7918 src/dps8/dps8_eis.c op1->exponent & 0xff); // write 8-bit exponent exponent 7931 src/dps8/dps8_eis.c if (op1->exponent > 127) exponent 7936 src/dps8/dps8_eis.c if (op1->exponent < -128) exponent 10081 src/dps8/dps8_eis.c exponent 10295 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 10303 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 10313 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 10350 src/dps8/dps8_eis.c op3->exponent = 127; exponent 10428 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 10429 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 10432 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 10445 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 10450 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 10676 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 10684 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 10704 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 10741 src/dps8/dps8_eis.c op3->exponent = 127; exponent 10819 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 10820 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 10824 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 10837 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 10842 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11007 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11015 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11025 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 11062 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11140 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11141 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11145 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11158 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11163 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11348 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11356 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11366 src/dps8/dps8_eis.c int sf = e->S3==CSFL?op3->exponent:e->SF3; exponent 11403 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11479 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11480 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11484 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11497 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11502 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11664 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11672 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11682 src/dps8/dps8_eis.c op3->exponent = 127; exponent 11758 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 11759 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 11763 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 11776 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 11781 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 11966 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 11974 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 11995 src/dps8/dps8_eis.c op3->exponent = 127; exponent 12072 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 12073 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 12076 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 12089 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 12094 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 12165 src/dps8/dps8_eis.c exponent 12294 src/dps8/dps8_eis.c exponent 12424 src/dps8/dps8_eis.c exponent 12425 src/dps8/dps8_eis.c exponent 12494 src/dps8/dps8_eis.c exponent 12538 src/dps8/dps8_eis.c exponent 12542 src/dps8/dps8_eis.c exponent 12559 src/dps8/dps8_eis.c exponent 12586 src/dps8/dps8_eis.c exponent 12638 src/dps8/dps8_eis.c exponent 12655 src/dps8/dps8_eis.c exponent 12792 src/dps8/dps8_eis.c exponent 13006 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 13023 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 13047 src/dps8/dps8_eis.c NQ = (n2-clz2+1) - (n1-clz1) + (-(e->S1==CSFL?op1->exponent:(int)e->SF1)); exponent 13050 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF2,NQ); exponent 13085 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n2 - op3->digits)); exponent 13121 src/dps8/dps8_eis.c _1a.exponent = 0; exponent 13122 src/dps8/dps8_eis.c _2a.exponent = 0; exponent 13127 src/dps8/dps8_eis.c op1->exponent,op2->exponent,op1->digits,op2->digits,_1a.digits,_2a.digits); exponent 13138 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv2d: addzero n2 %d %s exp %d\n",n2,res,op3->exponent); exponent 13149 src/dps8/dps8_eis.c op3->exponent = 127; exponent 13224 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 13225 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 13228 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 13241 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 13246 src/dps8/dps8_eis.c if (op3->exponent < -128) exponent 13432 src/dps8/dps8_eis.c op1->exponent = e->exponent; exponent 13449 src/dps8/dps8_eis.c op2->exponent = e->exponent; exponent 13490 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 13493 src/dps8/dps8_eis.c e->S1,e->S2,e->N1,e->N2,clz1,clz2,op1->exponent,op2->exponent,e->SF3,NQ); exponent 13528 src/dps8/dps8_eis.c decNumberFromInt32(&_sf, op3->exponent - (n3 - op3->digits)); exponent 13564 src/dps8/dps8_eis.c _1a.exponent = 0; exponent 13565 src/dps8/dps8_eis.c _2a.exponent = 0; exponent 13571 src/dps8/dps8_eis.c op1->exponent ,op2->exponent, op1->digits, exponent 13583 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "dv3d: addzero n3 %d %s exp %d\n",n3,res,op3->exponent); exponent 13594 src/dps8/dps8_eis.c op3->exponent = 127; exponent 13671 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, (op3->exponent >> 4) & 0xf); // upper 4-bits exponent 13672 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xf); // lower 4-bits exponent 13675 src/dps8/dps8_eis.c EISwrite49(cpup, &e->ADDR3, &pos, (int) dstTN, op3->exponent & 0xff); // write 8-bit exponent exponent 13688 src/dps8/dps8_eis.c if (op3->exponent > 127) exponent 13693 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;