dt/int/sc_nbexterns.cc

66 add_on_help(small_type &us, int /* unb */, int und, sc_digit *ud,
73             vec_add_on(und, ud, vnd, vd);
75             vec_add_on2(und, ud, vnd, vd);
78         // vec_cmp expects that und is the number of non-zero digits in ud.
79         int new_und = vec_skip_leading_zeros(und, ud);
80         int cmp_res = vec_cmp(new_und, ud, vnd, vd);
84             vec_zero(und, ud);
89             vec_sub_on(und, ud, vnd, vd);
92             vec_sub_on2(und, ud, vnd, vd);
121 mul_on_help_signed(small_type &us, int unb, int und, sc_digit *ud,
129         und = vec_skip_leading_zeros(und, ud);
132         sc_digit ud0 = (*ud);
136             us = CONVERT_SM_to_2C_to_SM(us, unb, old_und, ud);
141             COPY_DIGITS(us, unb, old_und, ud, vnb, vnd, vd);
149             COPY_DIGITS(us, unb, old_und, ud, unb + vnb, 1, &d);
166             vec_mul_small(und, ud, vd0, d);
168             vec_mul(und, ud, vnd, vd, d);
170             vec_mul(vnd, vd, und, ud, d);
172         COPY_DIGITS(us, unb, old_und, ud, unb + vnb, nd, d);
184 mul_on_help_unsigned(small_type &us, int unb, int und, sc_digit *ud,
192         und = vec_skip_leading_zeros(und, ud);
195         sc_digit ud0 = (*ud);
199             us = CONVERT_SM_to_2C_to_SM(us, unb, old_und, ud);
204             COPY_DIGITS(us, unb, old_und, ud, vnb, vnd, vd);
212             COPY_DIGITS(us, unb, old_und, ud, unb + vnb, 1, &d);
229             vec_mul_small(und, ud, vd0, d);
231             vec_mul(und, ud, vnd, vd, d);
233             vec_mul(vnd, vd, und, ud, d);
235         COPY_DIGITS(us, unb, old_und, ud, unb + vnb, nd, d);
251 div_on_help_signed(small_type &us, int unb, int und, sc_digit *ud,
259         und = vec_skip_leading_zeros(und, ud);
262         int cmp_res = vec_cmp(und, ud, vnd, vd);
266             vec_zero(old_und, ud);
273             us = CONVERT_SM_to_2C_to_SM(us, unb, old_und, ud);
292             d[0] = (*ud) / vd0;
294             vec_div_small(und, ud, vd0, d);
296             vec_div_large(und, ud, vnd, vd, d);
298         COPY_DIGITS(us, unb, old_und, ud, sc_max(unb, vnb), nd - 1, d);
310 div_on_help_unsigned(small_type &us, int unb, int und, sc_digit *ud,
318         und = vec_skip_leading_zeros(und, ud);
321         int cmp_res = vec_cmp(und, ud, vnd, vd);
325             vec_zero(old_und, ud);
332             us = CONVERT_SM_to_2C_to_SM(us, unb, old_und, ud);
351             d[0] = (*ud) / vd0;
353             vec_div_small(und, ud, vd0, d);
355             vec_div_large(und, ud, vnd, vd, d);
357         COPY_DIGITS(us, unb, old_und, ud, sc_max(unb, vnb), nd - 1, d);
373 mod_on_help_signed(small_type &us, int unb, int und, sc_digit *ud,
380         und = vec_skip_leading_zeros(und, ud);
383         int cmp_res = vec_cmp(und, ud, vnd, vd);
392             vec_zero(old_und, ud);
401             vec_zero(old_und, ud);
417             d[0] = (*ud) % vd0;
419             d[0] = vec_rem_small(und, ud, vd0);
421             vec_rem_large(und, ud, vnd, vd, d);
426             vec_zero(old_und, ud);
428             COPY_DIGITS(us, unb, old_und, ud, sc_min(unb, vnd), nd - 1, d);
439 mod_on_help_unsigned(small_type &us, int unb, int und, sc_digit *ud,
446         und = vec_skip_leading_zeros(und, ud);
449         int cmp_res = vec_cmp(und, ud, vnd, vd);
458             vec_zero(old_und, ud);
468             vec_zero(old_und, ud);
484             d[0] = (*ud) % vd0;
486             d[0] = vec_rem_small(und, ud, vd0);
488             vec_rem_large(und, ud, vnd, vd, d);
493             vec_zero(old_und, ud);
495             COPY_DIGITS(us, unb, old_und, ud, sc_min(unb, vnd), nd - 1, d);
511 and_on_help(small_type us, int /* unb */, int und, sc_digit *ud,
514     sc_digit *x = ud;
587 or_on_help(small_type us, int /* unb */, int und, sc_digit *ud,
590     sc_digit *x = ud;
665 xor_on_help(small_type us, int /* unb */, int und, sc_digit *ud,
668     sc_digit *x = ud;