Lines Matching refs:ub
192 uByte *ub; /* .. */ in decDivide() local
539 for (uq=msuq, ub=bcdacc+1; uq>=lsuq; uq--, ub+=9) { in decDivide()
542 UBFROMUI(ub, 0); /* clear 9 BCD8s */ in decDivide()
543 UBFROMUI(ub+4, 0); /* .. */ in decDivide()
544 *(ub+8)=0; /* .. */ in decDivide()
558 UBFROMUI(ub, UBTOUI(&BIN2BCD8[top*4])); in decDivide()
559 UBFROMUI(ub+3, UBTOUI(&BIN2BCD8[mid*4])); in decDivide()
560 UBFROMUI(ub+6, UBTOUI(&BIN2BCD8[rem*4])); in decDivide()
562 ub--; /* -> lsu */ in decDivide()
567 num.lsd=ub; in decDivide()
575 for (; *ub==0;) ub--; /* drop zeros */ in decDivide()
576 num.exponent+=(Int)(num.lsd-ub); /* and adjust exponent */ in decDivide()
577 num.lsd=ub; in decDivide()
609 for (ub=num.lsd+1; ub<=num.lsd+num.exponent; ub++) *ub=0; in decDivide()
631 for (ub=roundat+1; ub<=num.lsd; ub++) { in decDivide()
632 if (*ub!=0) { in decDivide()
650 ub=num.lsd; in decDivide()
651 for (; UBTOUI(ub-3)==0x09090909; ub-=4) UBFROMUI(ub-3, 0); in decDivide()
652 for (; *ub==9; ub--) *ub=0; /* at most 3 more */ in decDivide()
653 *ub+=1; in decDivide()
654 if (ub<num.msd) num.msd--; /* carried */ in decDivide()
723 uByte *ub; /* .. */ in decFiniteMultiply() local
1028 for (ub=bcdacc;; pa--, ub+=9) { in decFiniteMultiply()
1043 UBFROMUI(ub, UBTOUI(&BIN2BCD8[top*4])); in decFiniteMultiply()
1044 UBFROMUI(ub+3, UBTOUI(&BIN2BCD8[mid*4])); in decFiniteMultiply()
1045 UBFROMUI(ub+6, UBTOUI(&BIN2BCD8[rem*4])); in decFiniteMultiply()
1048 UBFROMUI(ub, 0); /* clear 9 BCD8s */ in decFiniteMultiply()
1049 UBFROMUI(ub+4, 0); /* .. */ in decFiniteMultiply()
1050 *(ub+8)=0; /* .. */ in decFiniteMultiply()
1055 num->lsd=ub+8; /* complete the bcdnum .. */ in decFiniteMultiply()
1117 uByte *ub, *us, *ut; /* work */ in decFloatAdd() local
1351 for (ub=ulsd; *ub==9; ub--) *ub=0; in decFloatAdd()
1352 *ub+=1; in decFloatAdd()
1365 ub=ulsd+gap+1; /* where MSD will go */ in decFloatAdd()
1368 for (; ut<ub; ut+=4) UBFROMUI(ut, 0); /* mind the gap */ in decFloatAdd()
1370 *ub=(uByte)(!DFISZERO(dfr)); /* make sticky digit */ in decFloatAdd()
1373 GETCOEFF(dfr, ub); /* decode from decFloat */ in decFloatAdd()
1374 ub+=DECPMAX-1; /* new LSD... */ in decFloatAdd()
1376 ulsd=ub; /* save new LSD */ in decFloatAdd()
1383 ub=buf+COFF; /* where msd will go */ in decFloatAdd()
1387 GETCOEFF(dfr, ub); /* decode from decFloat */ in decFloatAdd()
1390 ub=buf+COFF+DECPMAX-overlap; /* where MSD will go */ in decFloatAdd()
1398 if (ub>buf+12) { in decFloatAdd()
1400 for (; ut<ub; ut+=4) UBFROMUI(ut, 0); /* fill them */ in decFloatAdd()
1402 GETCOEFF(dfr, ub); /* decode from decFloat */ in decFloatAdd()
1408 if (buf+COFF+DECPMAX+8<ub+DECPMAX) { in decFloatAdd()
1411 for (; us<ub+DECPMAX; us+=4, ut+=4) UBFROMUI(ut, UBTOUI(us)); in decFloatAdd()
1415 ulsd=acc+(ub-buf+DECPMAX-1); /* update LSD pointer */ in decFloatAdd()
1526 for (ub=ulsd; *ub==9; ub--) *ub=0; in decFloatAdd()
1527 *ub+=1; in decFloatAdd()
1757 uByte *ub, *uc; /* work */ in decFloatCompareTotal() local
1771 for (ub=bufl, uc=bufr; ub<bufl+DECPMAX+QUAD*2; ub+=4, uc+=4) { in decFloatCompareTotal()
1772 uInt ui=UBTOUI(ub); in decFloatCompareTotal()
1775 for (;; ub++, uc++) { in decFloatCompareTotal()
1776 if (*ub==*uc) continue; in decFloatCompareTotal()
1777 if (*ub>*uc) comp=sigl; /* difference found */ in decFloatCompareTotal()
2024 uByte *ub, *uh, *ul; /* work */ in decFloatFMA() local
2141 ub=acc+FMALEN-1; /* where lsd of result will go */ in decFloatFMA()
2184 for (; ul-3>=lo->msd && padding>3; padding-=4, ul-=4, ub-=4) { in decFloatFMA()
2185 UBFROMUI(ub-3, UBTOUI(ul-3)); /* [cannot overlap] */ in decFloatFMA()
2187 for (; ul>=lo->msd && padding>0; padding--, ul--, ub--) *ub=*ul; in decFloatFMA()
2188 for (;padding>0; padding--, ub--) *ub=0; /* mind the gap */ in decFloatFMA()
2198 for (;; ub--) { in decFloatFMA()
2200 *ub=(uByte)(carry+(*uh--)+(*ul--)); in decFloatFMA()
2202 if (*ub<10) continue; in decFloatFMA()
2203 *ub-=10; in decFloatFMA()
2208 for (;; ub--) { in decFloatFMA()
2210 *ub=(uByte)(carry+(*uh--)); /* [+0] */ in decFloatFMA()
2212 if (*ub<10) continue; in decFloatFMA()
2213 *ub-=10; in decFloatFMA()
2218 for (;; ub--) { in decFloatFMA()
2220 *ub=(uByte)(carry+hipad+(*ul--)); in decFloatFMA()
2222 if (*ub<10) continue; in decFloatFMA()
2223 *ub-=10; in decFloatFMA()
2231 lo->msd=ub+1; in decFloatFMA()
2236 *ub=1; /* place the 1 .. */ in decFloatFMA()
2905 uByte *ub, *uc; /* work */ in decFloatQuantize() local
2985 for (ub=roundat+1; ub<BUFOFF+DECPMAX; ub++) { in decFloatQuantize()
2986 if (*ub!=0) { /* non-zero to be discarded */ in decFloatQuantize()
3002 for (ub=roundat+1; ub<BUFOFF+DECPMAX; ub++) { in decFloatQuantize()
3003 if (*ub!=0) { /* non-zero to be discarded */ in decFloatQuantize()
3064 ub=ulsd; in decFloatQuantize()
3065 for (; UBTOUI(ub-3)==0x09090909; ub-=4) UBFROMUI(ub-3, 0); in decFloatQuantize()
3067 for (; *ub==9; ub--) *ub=0; in decFloatQuantize()
3068 *ub+=1; in decFloatQuantize()
3141 #define getDPD3q(dpd, n) ub=ulsd-(3*(n))-2; \ in decFloatQuantize()
3142 dpd=BCD2DPD[(*ub*256)+(*(ub+1)*16)+*(ub+2)]; in decFloatQuantize()
3193 uByte buf[DECPMAX], *ub; /* coefficient and pointer */ in decFloatReduce() local
3206 ub=buf+DECPMAX-1; /* -> lsd */ in decFloatReduce()
3207 if (*ub) return result; /* no trailing zeros */ in decFloatReduce()
3208 for (ub--; *ub==0;) ub--; /* terminates because non-zero */ in decFloatReduce()
3211 num.exponent=GETEXPUN(df)+(Int)(buf+DECPMAX-1-ub); /* adjusted exponent */ in decFloatReduce()
3213 num.lsd=ub; in decFloatReduce()
3276 uByte *ub; /* .. */ in decFloatRotate() local
3298 ub=buf; in decFloatRotate()
3299 if (rotate<0) ub+=PHALF; /* rotate right, so space to left */ in decFloatRotate()
3300 GETCOEFF(dfl, ub); in decFloatRotate()
3625 uByte *ub, *uc; /* work */ in decNumCompare() local
3689 for (ub=bufl, uc=bufr; ub<bufl+DECPMAX+QUAD*2; ub+=4, uc+=4) { in decNumCompare()
3690 uInt ui=UBTOUI(ub); in decNumCompare()
3693 for (;; ub++, uc++) { in decNumCompare()
3694 if (*ub>*uc) return sigl; /* difference found */ in decNumCompare()
3695 if (*ub<*uc) return sigr; /* .. */ in decNumCompare()
3700 ub=bufl; /* RHS pointer */ in decNumCompare()
3711 for (;; ub+=4) { in decNumCompare()
3712 if (UBTOUI(ub)!=0) return sigl; in decNumCompare()
3713 if (ub+4>bufl+shift-4) break; in decNumCompare()
3717 for (; ub<bufl+shift; ub++) if (*ub!=0) return sigl; in decNumCompare()
3721 for (uc=bufr; ; uc+=4, ub+=4) { in decNumCompare()
3722 uInt ui=UBTOUI(ub); in decNumCompare()
3724 for (;; uc++, ub++) { /* check from left [little-endian?] */ in decNumCompare()
3725 if (*ub>*uc) return sigl; /* difference found */ in decNumCompare()
3726 if (*ub<*uc) return sigr; /* .. */ in decNumCompare()
3755 for (ub=bufl; ; ub+=4, uc+=4) { in decNumCompare()
3756 uInt ui=UBTOUI(ub); in decNumCompare()
3758 for (;; ub++, uc++) { /* check from left [little-endian?] */ in decNumCompare()
3759 if (*ub>*uc) return sigl; /* difference found */ in decNumCompare()
3760 if (*ub<*uc) return sigr; /* .. */ in decNumCompare()
3763 if (ub==bufl+QUAD*2+DECPMAX-4) break; /* all checked */ in decNumCompare()