DECDPUNMAX 308 src/decNumber/decNumber.c *up=(Unit)(uin%(DECDPUNMAX+1)); DECDPUNMAX 309 src/decNumber/decNumber.c uin=uin/(DECDPUNMAX+1); DECDPUNMAX 3738 src/decNumber/decNumber.c if ((partial<=DECDPUNMAX) // result fits in unit DECDPUNMAX 4220 src/decNumber/decNumber.c msu2pair=(eInt)*msu2*(DECDPUNMAX+1);// top two pair .. DECDPUNMAX 4302 src/decNumber/decNumber.c mult=(Int)(((eInt)*msu1*(DECDPUNMAX+1)+*(msu1-1))/msu2pair); DECDPUNMAX 4307 src/decNumber/decNumber.c mult=(Int)(((eInt)*msu1*(DECDPUNMAX+1)+*(msu1-1))/msu2plus); DECDPUNMAX 4486 src/decNumber/decNumber.c *(up-1)+=(DECDPUNMAX+1)/2; DECDPUNMAX 4500 src/decNumber/decNumber.c if (*up!=DECDPUNMAX) break;// non-nines DECDPUNMAX 4814 src/decNumber/decNumber.c uInt part=item/(DECDPUNMAX+1); DECDPUNMAX 4815 src/decNumber/decNumber.c *up=(Unit)(item-(part*(DECDPUNMAX+1))); DECDPUNMAX 6104 src/decNumber/decNumber.c if ((ueInt)carry<=DECDPUNMAX) { // fastpath 0-DECDPUNMAX DECDPUNMAX 6112 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6114 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6116 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6120 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6122 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6123 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6124 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6126 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6130 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6132 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6134 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6138 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6140 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6141 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6142 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6144 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6149 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6154 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6156 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6157 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6160 src/decNumber/decNumber.c if ((ueInt)carry<(DECDPUNMAX+1)*2) { // fastpath carry +1 DECDPUNMAX 6161 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); // [helps additions] DECDPUNMAX 6166 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6167 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1); DECDPUNMAX 6171 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6172 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6173 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1)-(DECDPUNMAX+1); DECDPUNMAX 6190 src/decNumber/decNumber.c if ((ueInt)carry<=DECDPUNMAX) { // fastpath 0-DECDPUNMAX DECDPUNMAX 6199 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6201 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6203 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6207 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6209 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6210 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6211 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6213 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6217 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6219 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct DECDPUNMAX 6221 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6225 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6227 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6228 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6229 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK DECDPUNMAX 6231 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; DECDPUNMAX 6235 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder DECDPUNMAX 6240 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6242 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); DECDPUNMAX 6243 src/decNumber/decNumber.c carry=est-(DECDPUNMAX+1); // correctly negative DECDPUNMAX 6245 src/decNumber/decNumber.c if ((ueInt)carry<(DECDPUNMAX+1)*2){ // fastpath carry 1 DECDPUNMAX 6246 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); DECDPUNMAX 6252 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6253 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1); DECDPUNMAX 6257 src/decNumber/decNumber.c carry=carry+(eInt)(DECDPUNMAX+1)*(DECDPUNMAX+1); // make positive DECDPUNMAX 6258 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); DECDPUNMAX 6259 src/decNumber/decNumber.c carry=carry/(DECDPUNMAX+1)-(DECDPUNMAX+1); DECDPUNMAX 6274 src/decNumber/decNumber.c add=DECDPUNMAX+add-*c; DECDPUNMAX 6275 src/decNumber/decNumber.c if (add<=DECDPUNMAX) { DECDPUNMAX 6883 src/decNumber/decNumber.c if (*up!=DECDPUNMAX) break; // not still 9s DECDPUNMAX 7108 src/decNumber/decNumber.c if (count>DECDPUN) *up=DECDPUNMAX; // unit full o'nines