datatypes/int/sc_nbcommon.inc

1579   int nd = u.ndigits;
1584   sc_digit *d = new sc_digit[nd];
1587   vec_copy(nd, d, u.digit);
1592     vec_add_small_on(nd, d, 1);
1598     vec_sub_small_on(nd, d, 1);
1600     if (check_for_zero(nd, d))
1605   return CLASS_TYPE(s, u.nbits, nd, d);
1717   int nd = DIV_CEIL(nb);
1723   sc_digit *d = new sc_digit[nd];
1726   vec_copy_and_zero(nd, d, u.ndigits, u.digit);
1728   convert_SM_to_2C(u.sgn, nd, d);
1730   vec_shift_left(nd, d, v);
1732   small_type s = convert_signed_2C_to_SM(nb, nd, d);
1734   return CLASS_TYPE(s, nb, nd, d);
1875   int nd = u.ndigits;
1880   sc_digit *d = new sc_digit[nd];
1883   vec_copy(nd, d, u.digit);
1885   convert_SM_to_2C(u.sgn, nd, d);
1888     vec_shift_right(nd, d, v, DIGIT_MASK);
1890     vec_shift_right(nd, d, v, 0);
1892   small_type s = convert_signed_2C_to_SM(nb, nd, d);
1894   return CLASS_TYPE(s, nb, nd, d);
2614 // Create a signed number with (s, nb, nd, d) as its attributes (as
2617                        int nd, sc_digit *d,
2627   if (ndigits <= nd)
2630     vec_copy_and_zero(ndigits, digit, nd, d);
2691   int nd;
2696     nd = left_digit + 1;
2698     nd = left_digit - right_digit + 1;
2705   sc_digit *d = new sc_digit[nd];
2711     vec_copy(nd, d, u->digit);
2712     vec_complement(nd, d);  // d = -d;
2713     vec_shift_right(nd, d, r, DIGIT_MASK);
2721     vec_shift_right(nd, d, r - right_digit * BITS_PER_DIGIT, 0);
2728     vec_copy(sc_min(nd, ndigits), digit, d);
2741     int nd_less_1 = nd - 1;
2757     for (int j = nd - 2; j >= 0; --j) { // j = nd - 2
2839   int nd;
2844     nd = left_digit + 1;
2846     nd = left_digit - right_digit + 1;
2853   sc_digit *d = new sc_digit[nd];
2859     vec_copy(nd, d, u->digit);
2860     vec_complement(nd, d);  // d = -d;
2861     vec_shift_right(nd, d, r, DIGIT_MASK);
2869     vec_shift_right(nd, d, r - right_digit * BITS_PER_DIGIT, 0);
2876     vec_copy(sc_min(nd, ndigits), digit, d);
2889     int nd_less_1 = nd - 1;
2905     for (int j = nd - 2; j >= 0; --j) { // j = nd - 2