]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - sysdeps/ieee754/ldbl-128ibm/e_atanhl.c
PowerPC floating point little-endian [2 of 15]
[thirdparty/glibc.git] / sysdeps / ieee754 / ldbl-128ibm / e_atanhl.c
index f35182f03e5819be643bd8d7f219ca6a81e16f9e..29f2e92072128713361e309cc0fd34703cb4b9e6 100644 (file)
@@ -40,8 +40,10 @@ __ieee754_atanhl(long double x)
 {
        long double t;
        int64_t hx,ix;
-       u_int64_t lx __attribute__ ((unused));
-       GET_LDOUBLE_WORDS64(hx,lx,x);
+       double xhi;
+
+       xhi = ldbl_high (x);
+       EXTRACT_WORDS64 (hx, xhi);
        ix = hx&0x7fffffffffffffffLL;
        if (ix >= 0x3ff0000000000000LL) { /* |x|>=1 */
            if (ix > 0x3ff0000000000000LL)