dt/int/sc_nbexterns.cc

67             small_type vs, int /* vnb */, int vnd, const sc_digit *vd)
69     vnd = vec_skip_leading_zeros(vnd, vd);
72         if (und >= vnd)
73             vec_add_on(und, ud, vnd, vd);
75             vec_add_on2(und, ud, vnd, vd);
80         int cmp_res = vec_cmp(new_und, ud, vnd, vd);
89             vec_sub_on(und, ud, vnd, vd);
92             vec_sub_on2(und, ud, vnd, vd);
122                    int vnb, int vnd, const sc_digit *vd)
130         vnd = vec_skip_leading_zeros(vnd, vd);
135         if ((vnd == 1) && (vd0 == 1)) {
141             COPY_DIGITS(us, unb, old_und, ud, vnb, vnd, vd);
145         if ((und == 1) && (vnd == 1) &&
153         int nd = und + vnd;
164             vec_mul_small(vnd, vd, ud0, d);
165         else if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
167         else if (vnd < und)
168             vec_mul(und, ud, vnd, vd, d);
170             vec_mul(vnd, vd, und, ud, d);
185                      int vnb, int vnd, const sc_digit *vd)
193         vnd = vec_skip_leading_zeros(vnd, vd);
198         if ((vnd == 1) && (vd0 == 1)) {
204             COPY_DIGITS(us, unb, old_und, ud, vnb, vnd, vd);
208         if ((und == 1) && (vnd == 1) &&
216         int nd = und + vnd;
227             vec_mul_small(vnd, vd, ud0, d);
228         else if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
230         else if (vnd < und)
231             vec_mul(und, ud, vnd, vd, d);
233             vec_mul(vnd, vd, und, ud, d);
252                    int vnb, int vnd, const sc_digit *vd)
260         vnd = vec_skip_leading_zeros(vnd, vd);
262         int cmp_res = vec_cmp(und, ud, vnd, vd);
272         if ((cmp_res > 0) && (vnd == 1) && (vd0 == 1)) {
278         int nd = sc_max(und, vnd) + 1;
291         else if ((vnd == 1) && (und == 1))
293         else if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
296             vec_div_large(und, ud, vnd, vd, d);
311                      int vnb, int vnd, const sc_digit *vd)
319         vnd = vec_skip_leading_zeros(vnd, vd);
321         int cmp_res = vec_cmp(und, ud, vnd, vd);
331         if ((cmp_res > 0) && (vnd == 1) && (vd0 == 1))  {
337         int nd = sc_max(und, vnd) + 1;
350         else if ((vnd == 1) && (und == 1))
352         else if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
355             vec_div_large(und, ud, vnd, vd, d);
374                    int /* vnb */, int vnd, const sc_digit *vd)
381         vnd = vec_skip_leading_zeros(vnd, vd);
383         int cmp_res = vec_cmp(und, ud, vnd, vd);
399         if ((vnd == 1) && (vd0 == 1)) {
406         int nd = sc_max(und, vnd) + 1;
416         if ((vnd == 1) && (und == 1))
418         if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
421             vec_rem_large(und, ud, vnd, vd, d);
428             COPY_DIGITS(us, unb, old_und, ud, sc_min(unb, vnd), nd - 1, d);
440                      int /* vnb */, int vnd, const sc_digit *vd)
447         vnd = vec_skip_leading_zeros(vnd, vd);
449         int cmp_res = vec_cmp(und, ud, vnd, vd);
466         if ((vnd == 1) && (vd0 == 1)) {
473         int nd = sc_max(und, vnd) + 1;
483         if ((vnd == 1) && (und == 1))
485         if ((vnd == 1) && (vd0 < HALF_DIGIT_RADIX))
488             vec_rem_large(und, ud, vnd, vd, d);
495             COPY_DIGITS(us, unb, old_und, ud, sc_min(unb, vnd), nd - 1, d);
512             small_type vs, int /* vnb */, int vnd, const sc_digit *vd)
517     int ynd = vnd;
588            small_type vs, int /* vnb */, int vnd, const sc_digit *vd)
593     int ynd = vnd;
666             small_type vs, int /* vnb */, int vnd, const sc_digit *vd)
671     int ynd = vnd;