DECDPUNMAX 293 src/decNumber/decNumber.c *up=(Unit)(uin%(DECDPUNMAX+1)); DECDPUNMAX 294 src/decNumber/decNumber.c uin=uin/(DECDPUNMAX+1); DECDPUNMAX 3721 src/decNumber/decNumber.c if ((partial<=DECDPUNMAX) // result fits in unit DECDPUNMAX 4200 src/decNumber/decNumber.c msu2pair=(eInt)*msu2*(DECDPUNMAX+1);// top two pair .. DECDPUNMAX 4282 src/decNumber/decNumber.c mult=(Int)(((eInt)*msu1*(DECDPUNMAX+1)+*(msu1-1))/msu2pair); DECDPUNMAX 4287 src/decNumber/decNumber.c mult=(Int)(((eInt)*msu1*(DECDPUNMAX+1)+*(msu1-1))/msu2plus); DECDPUNMAX 4466 src/decNumber/decNumber.c *(up-1)+=(DECDPUNMAX+1)/2; DECDPUNMAX 4480 src/decNumber/decNumber.c if (*up!=DECDPUNMAX) break;// non-nines DECDPUNMAX 4794 src/decNumber/decNumber.c uInt part=item/(DECDPUNMAX+1); DECDPUNMAX 4795 src/decNumber/decNumber.c *up=(Unit)(item-(part*(DECDPUNMAX+1))); DECDPUNMAX 6084 src/decNumber/decNumber.c if ((ueInt)carry<=DECDPUNMAX) { // fastpath 0-DECDPUNMAX DECDPUNMAX 6092 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6094 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6096 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6100 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6102 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6103 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6104 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6106 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6110 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6112 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6114 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6118 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6120 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6121 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6122 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6124 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6129 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6134 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6136 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6137 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6140 src/decNumber/decNumber.c if ((ueInt)carry<(DECDPUNMAX+1)*2) { // fastpath carry +1 DECDPUNMAX 6141 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); // [helps additions] DECDPUNMAX 6146 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6147 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1); DECDPUNMAX 6151 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6152 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6153 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1)-(DECDPUNMAX+1); DECDPUNMAX 6170 src/decNumber/decNumber.c if ((ueInt)carry<=DECDPUNMAX) { // fastpath 0-DECDPUNMAX DECDPUNMAX 6179 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6181 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6183 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6187 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6189 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6190 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6191 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6193 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6197 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6199 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6201 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6205 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6207 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6208 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6209 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6211 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6215 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6220 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6222 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6223 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6225 src/decNumber/decNumber.c if ((ueInt)carry<(DECDPUNMAX+1)*2){ // fastpath carry 1 DECDPUNMAX 6226 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); DECDPUNMAX 6232 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6233 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1); DECDPUNMAX 6237 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6238 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6239 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1)-(DECDPUNMAX+1); DECDPUNMAX 6254 src/decNumber/decNumber.c add=DECDPUNMAX+add-*c; DECDPUNMAX 6255 src/decNumber/decNumber.c if (add<=DECDPUNMAX) { DECDPUNMAX 6863 src/decNumber/decNumber.c if (*up!=DECDPUNMAX) break; // not still 9s DECDPUNMAX 7086 src/decNumber/decNumber.c if (count>DECDPUN) *up=DECDPUNMAX; // unit full o'nines