config/libbid/bid128_fma.c

285   int incr_exp = 0;
403       round128_19_38 (ind, x0, P128, &R128, &incr_exp,
410       round192_39_57 (ind, x0, P192, &R192, &incr_exp,
416       round256_58_76 (ind, x0, R256, &R256, &incr_exp,
423     e4 = e4 + x0 + incr_exp;
535         round64_2_18 (ind, x0, res.w[0], &R64, &incr_exp,
543         round128_19_38 (ind, x0, P128, &res, &incr_exp,
549       // we want the exponent to be expmin, so if incr_exp = 1 then
551       if (incr_exp) {
675   int incr_exp = 0;
1301         round128_19_38 (q4, x0, P128, &res, &incr_exp,
1309         round192_39_57 (q4, x0, P192, &R192, &incr_exp,
1316         round256_58_76 (q4, x0, C4, &R256, &incr_exp,
1324       if (incr_exp) {
1400             round64_2_18 (q4, x0, res.w[0], &R64, &incr_exp,
1404             if (incr_exp) {
1414             round128_19_38 (q4, x0, P128, &res, &incr_exp,
1418             if (incr_exp) {
1765               round64_2_18 (q4, q4 - 1, C4.w[0], &R64, &incr_exp,
1772               round128_19_38 (q4, q4 - 1, P128, &R128, &incr_exp,
1782               round192_39_57 (q4, q4 - 1, P192, &R192, &incr_exp,
1789               round256_58_76 (q4, q4 - 1, C4, &R256, &incr_exp,
1796             if (incr_exp) {
2116         	round64_2_18 (q4, q4 - 1, C4.w[0], &R64, &incr_exp,
2124         	round128_19_38 (q4, q4 - 1, P128, &R128, &incr_exp,
2134         	round192_39_57 (q4, q4 - 1, P192, &R192, &incr_exp,
2141         	round256_58_76 (q4, q4 - 1, C4, &R256, &incr_exp,
2151         	// incr_exp = 0 with certainty
2161         	// however, if incr_exp = 1 then R64 = 10 with certainty
2162         	if (incr_exp) {
2372         round64_2_18 (q4, x0, C4.w[0], &R64, &incr_exp,
2375         if (incr_exp) {
2385         round128_19_38 (q4, x0, P128, &R128, &incr_exp,
2389         if (incr_exp) {
2404         round192_39_57 (q4, x0, P192, &R192, &incr_exp,
2409         if (incr_exp) {
2425         round256_58_76 (q4, x0, C4, &R256, &incr_exp,
2430         if (incr_exp) {
2471           round128_19_38 (35, 1, P128, &res, &incr_exp,
2475           // incr_exp is 0 with certainty in this case
2611           incr_exp = 0;
2738           round64_2_18 (ind, x0, res.w[0], &R64, &incr_exp,
2742           if (incr_exp) {
2752           round128_19_38 (ind, x0, P128, &res, &incr_exp,
2756           if (incr_exp) {
2926         round128_19_38 (q4, x0, P128, &res, &incr_exp,
2934         round192_39_57 (q4, x0, P192, &R192, &incr_exp,
2941         round256_58_76 (q4, x0, C4, &R256, &incr_exp,
2949       if (incr_exp) {
3111         round64_2_18 (q3, x0, C3.w[0], &R64, &incr_exp,
3117         round128_19_38 (q3, x0, C3, &R128, &incr_exp,
3125       // we want the exponent to be e4, so if incr_exp = 1 then
3127       if (incr_exp) {
3230           round128_19_38 (ind, x0, P128, &R128, &incr_exp,
3238           round192_39_57 (ind, x0, P192, &R192, &incr_exp,
3245           round256_58_76 (ind, x0, R256, &R256, &incr_exp,
3253         e4 = e4 + x0 + incr_exp;
3438             round64_2_18 (ind, x0, res.w[0], &R64, &incr_exp,
3447             round128_19_38 (ind, x0, P128, &res, &incr_exp,
3453           // we want the exponent to be expmin, so if incr_exp = 1 then
3455           if (incr_exp) {
4120   int incr_exp;
4255       round64_2_18 (q, x0, C.w[0], &res1, &incr_exp,
4259       round128_19_38 (q, x0, C, &res128, &incr_exp,
4265     if (incr_exp)
4352         round64_2_18 (q, x0, res1, &res1, &incr_exp,
4355         if (incr_exp) {