Lines Matching refs:DECDPUN
205 #if DECDPUN<=4
217 #error decNumber.c: DECUSE64 must be 1 when DECDPUN>4
386 #if DECDPUN>1 /* split to higher */ in decNumberToInt32()
392 for (d=DECDPUN; d<dn->digits; up++, d+=DECDPUN) hi+=*up*powers[d-1]; in decNumberToInt32()
422 #if DECDPUN>1 /* split to higher */ in decNumberToUInt32()
428 for (d=DECDPUN; d<dn->digits; up++, d+=DECDPUN) hi+=*up*powers[d-1]; in decNumberToUInt32()
525 for (d = 1; d <= dn->digits; up++, d += DECDPUN) { in decNumberIntegralToInt64()
572 for (d = (dn->digits - 1) / DECDPUN; d >= 0; d--) { in decNumberIntegralToInt128()
667 #if DECDPUN>1 in decNumberFromString()
829 #if DECDPUN>1 in decNumberFromString()
832 cut=d-(up-res)*DECDPUN; /* digits in top unit */ in decNumberFromString()
841 cut=DECDPUN; /* .. */ in decNumberFromString()
995 for (i=0; i<DECDPUN; i++) { in decNumberAnd()
1385 for (i=0; i<DECDPUN; i++) { in decNumberInvert()
1662 #if DECDPUN==1 in decNumberLog10()
2001 for (i=0; i<DECDPUN; i++) { in decNumberOr()
2685 units=rotate/DECDPUN; /* whole units to rotate */ in decNumberRotate()
2686 shift=rotate%DECDPUN; /* left-over digits count */ in decNumberRotate()
2694 +(Unit)(rem*powers[DECDPUN-(shift-msudigits)]); /* .. */ in decNumberRotate()
2706 shift=DECDPUN-msudigits; in decNumberRotate()
3090 #if DECDPUN>=3 in decNumberSquareRoot()
3093 #elif DECDPUN==2 in decNumberSquareRoot()
3107 #if DECDPUN>=3 in decNumberSquareRoot()
3110 #elif DECDPUN==2 in decNumberSquareRoot()
3415 for (i=0; i<DECDPUN; i++) { in decNumberXor()
3516 if (src->digits>DECDPUN) { /* more Units to come */ in decNumberCopy()
3609 #if DECDPUN==1 /* trivial simple copy */ in decNumberGetBCD()
3613 uInt cut=DECDPUN; /* downcounter through unit */ in decNumberGetBCD()
3621 cut=DECDPUN; in decNumberGetBCD()
3643 #if DECDPUN==1 /* trivial simple copy */ in decNumberSetBCD()
3651 cut=DECDPUN; /* next Unit has all digits */ in decNumberSetBCD()
3813 cut=DECDPUN-1; /* next Unit has all digits */ in decToString()
3857 cut=DECDPUN-1; in decToString()
3868 cut=DECDPUN-1; in decToString()
3884 cut=DECDPUN-1; in decToString()
4090 && rhs->digits<=DECDPUN in decAddOp()
4099 && (lhs->digits>=DECDPUN || /* .. and no digits-count change */ in decAddOp()
4168 mult=powers[padding-(rhsshift*DECDPUN)]; /* .. this by multiplication */ in decAddOp()
4212 *DECDPUN; /* [units -> digits] */ in decAddOp()
4371 Unit accbuff[SD2U(DECBUFFER+DECDPUN+10)]; /* local buffer */ in decDivideOp()
4379 Unit varbuff[SD2U(DECBUFFER*2+DECDPUN)*sizeof(Unit)]; /* buffer for var1 */ in decDivideOp()
4551 acclength=D2U(reqdigits+DECDPUN); /* in Units */ in decDivideOp()
4630 var1initpad=(var1units-D2U(lhs->digits))*DECDPUN; in decDivideOp()
4633 else cut=DECDPUN-exponent%DECDPUN; in decDivideOp()
4638 for (u=msu1; cut>=DECDPUN; cut-=DECDPUN, u--) *u=0; in decDivideOp()
4646 exponent-=DECDPUN; /* update the exponent */ in decDivideOp()
4726 else accdigits+=DECDPUN; in decDivideOp()
4746 exponent-=DECDPUN; /* update the exponent */ in decDivideOp()
4771 #if DECDPUN>1 in decDivideOp()
4778 #if DECDPUN<=4 in decDivideOp()
4890 if (quotdigits>DECDPUN) { in decDivideOp()
4897 quotdigits-=DECDPUN; /* checked those digits */ in decDivideOp()
4908 expunits=exp/DECDPUN; in decDivideOp()
4909 exprem=exp%DECDPUN; in decDivideOp()
4983 #define FASTMUL (DECUSE64 && DECDPUN<5)
5003 #if DECDPUN & 1 /* odd */ in decMultiplyOp()
5024 #if DECDPUN==1 in decMultiplyOp()
5097 #define NEEDTWO (DECDPUN*2) /* within two decUnitAddSub calls */ in decMultiplyOp()
5122 #if DECDPUN==1 in decMultiplyOp()
5134 #if DECDPUN==1 in decMultiplyOp()
5141 p+=DECDPUN, cup++, count-=DECDPUN) in decMultiplyOp()
5146 p+=DECDPUN, cup++, count-=DECDPUN) in decMultiplyOp()
5207 for (p=0; p<FASTDIGS-DECDPUN; p+=DECDPUN, up++) { in decMultiplyOp()
5787 #if DECDPUN==1
6421 expunits=exp/DECDPUN;
6422 exprem=exp%DECDPUN;
6494 #if DECDPUN<=4 /* myriadal, millenary, etc. */
6538 #if DECDPUN==4 /* use divide-by-multiply */
6556 #elif DECDPUN==3
6574 #elif DECDPUN<=2
6577 est=QUOT10(carry, DECDPUN);
6584 est=QUOT10(carry, DECDPUN);
6625 #if DECDPUN==4 /* use divide-by-multiply */
6643 #elif DECDPUN==3
6661 #elif DECDPUN<=2
6663 est=QUOT10(carry, DECDPUN);
6670 est=QUOT10(carry, DECDPUN);
6762 #if DECDPUN<=4
6777 if (cut>DECDPUN) { /* need new Unit */
6838 if ((digits+shift)<=DECDPUN) { /* [fastpath] single-unit case */
6846 cut=DECDPUN-MSUDIGITS(shift); /* where to slice */
6854 #if DECDPUN<=4
6863 next=rem*powers[DECDPUN-cut]; /* save remainder for next Unit */
6894 if (shift==units*DECDPUN) { /* [fastpath] little to do */
6901 if (cut==DECDPUN) { /* unit-boundary case; easy */
6909 count=units*DECDPUN-shift; /* the maximum new length */
6910 #if DECDPUN<=4
6917 count-=(DECDPUN-cut);
6921 #if DECDPUN<=4
6928 *target=(Unit)(*target+rem*powers[DECDPUN-cut]);
7043 #if DECDPUN<=4
7053 for (target=dn->lsu; count>0; target++, up++, count-=DECDPUN)
7072 for (up=lsu; count>0; up++, count-=DECDPUN) if (*up!=0) { /* found non-0 */
7091 count+=DECDPUN;
7097 cut=discard-(count-DECDPUN)-1;
7098 if (cut==DECDPUN-1) { /* unit-boundary case (fast) */
7099 Unit half=(Unit)powers[DECDPUN]>>1;
7117 for (target=dn->lsu; count>0; target++, up++, count-=DECDPUN)
7127 #if DECDPUN<=4
7137 #if DECDPUN<=4
7163 count-=(DECDPUN-cut);
7167 #if DECDPUN<=4
7174 *target=(Unit)(*target+rem*powers[DECDPUN-cut]);
7307 if (count<=DECDPUN) {
7322 count-=DECDPUN;
7331 if (count<=DECDPUN) {
7338 for (up=up-1; up>=dn->lsu; up--) *up=(Unit)powers[DECDPUN]-1;
7360 count-=DECDPUN;
7547 if (count>DECDPUN) *up=DECDPUNMAX; /* unit full o'nines */
7552 count-=DECDPUN; /* filled those digits */
7715 for (; count>=DECDPUN; up++) {
7717 count-=DECDPUN;
7723 #if DECDPUN<=4
7732 got=DECDPUN-count; /* number of digits so far */
7739 if (got==0) {theInt=*up; got+=DECDPUN; up++;} /* ensure lsu is there */
7746 got+=DECDPUN;
7749 if (theInt/(Int)powers[got-DECDPUN]!=(Int)*(up-1)) ilength=11;
7793 if (cut!=DECDPUN) *msu%=powers[cut]; /* clear left digits */
7861 res->digits=D2U(set->digits)*DECDPUN;
7916 Int digits=(len-1)*DECDPUN+1; /* possible digits excluding msu */
7917 #if DECDPUN>4
7928 digits-=DECDPUN; /* adjust for 0 unit */
7931 #if DECDPUN>1 /* not done yet */
7934 #if DECDPUN>2 /* not done yet */
7937 #if DECDPUN>3 /* not done yet */
7940 #if DECDPUN>4 /* count the rest ... */
8022 for (cut=DECDPUN-1; cut>=0; cut--) {
8047 #if DECDPUN==9
8049 #elif DECDPUN==8
8051 #elif DECDPUN==7
8053 #elif DECDPUN==6
8055 #elif DECDPUN==5
8057 #elif DECDPUN==4
8059 #elif DECDPUN==3
8061 #elif DECDPUN==2
8186 if (d>DECDPUN) maxuint=DECDPUNMAX;
8202 d-=DECDPUN;