diff options
Diffstat (limited to 'sysdeps/ieee754')
-rw-r--r-- | sysdeps/ieee754/ldbl-128ibm/s_lrintl.c | 14 | ||||
-rw-r--r-- | sysdeps/ieee754/ldbl-128ibm/s_lroundl.c | 10 |
2 files changed, 12 insertions, 12 deletions
diff --git a/sysdeps/ieee754/ldbl-128ibm/s_lrintl.c b/sysdeps/ieee754/ldbl-128ibm/s_lrintl.c index 62180eb8cb..c2e2f68984 100644 --- a/sysdeps/ieee754/ldbl-128ibm/s_lrintl.c +++ b/sysdeps/ieee754/ldbl-128ibm/s_lrintl.c @@ -84,7 +84,7 @@ __lrintl (long double x) /* Peg at max/min values, assuming that the above conversions do so. Strictly speaking, we can return anything for values that overflow, but this is more useful. */ - res = hi + lo; + res = (long int) ((unsigned long int) hi + (unsigned long int) lo); /* This is just sign(hi) == sign(lo) && sign(res) != sign(hi). */ if (__glibc_unlikely (((~(hi ^ lo) & (res ^ hi)) < 0))) @@ -105,27 +105,27 @@ __lrintl (long double x) return res; if (xh < 0.0) - res -= 1; + res -= 1UL; else - res += 1; + res += 1UL; break; case FE_TOWARDZERO: if (res > 0 && (xh < 0.0 || (xh == 0.0 && xl < 0.0))) - res -= 1; + res -= 1UL; else if (res < 0 && (xh > 0.0 || (xh == 0.0 && xl > 0.0))) - res += 1; + res += 1UL; return res; break; case FE_UPWARD: if (xh > 0.0 || (xh == 0.0 && xl > 0.0)) - res += 1; + res += 1UL; break; case FE_DOWNWARD: if (xh < 0.0 || (xh == 0.0 && xl < 0.0)) - res -= 1; + res -= 1UL; break; } diff --git a/sysdeps/ieee754/ldbl-128ibm/s_lroundl.c b/sysdeps/ieee754/ldbl-128ibm/s_lroundl.c index 9cf4a121a7..010e8e28a1 100644 --- a/sysdeps/ieee754/ldbl-128ibm/s_lroundl.c +++ b/sysdeps/ieee754/ldbl-128ibm/s_lroundl.c @@ -80,7 +80,7 @@ __lroundl (long double x) /* Peg at max/min values, assuming that the above conversions do so. Strictly speaking, we can return anything for values that overflow, but this is more useful. */ - res = hi + lo; + res = (long int) ((unsigned long int) hi + (unsigned long int) lo); /* This is just sign(hi) == sign(lo) && sign(res) != sign(hi). */ if (__glibc_unlikely (((~(hi ^ lo) & (res ^ hi)) < 0))) @@ -92,21 +92,21 @@ __lroundl (long double x) hi = res; if (xh > 0.5) { - res += 1; + res += 1UL; } else if (xh == 0.5) { if (xl > 0.0 || (xl == 0.0 && res >= 0)) - res += 1; + res += 1UL; } else if (-xh > 0.5) { - res -= 1; + res -= 1UL; } else if (-xh == 0.5) { if (xl < 0.0 || (xl == 0.0 && res <= 0)) - res -= 1; + res -= 1UL; } if (__glibc_unlikely (((~(hi ^ (res - hi)) & (res ^ hi)) < 0))) |