/sysdeps/ieee754/ldbl-128ibm/ |
A D | s_rintl.c | 42 double xh, xl, hi, lo; in __rintl() local 44 ldbl_unpack (x, &xh, &xl); in __rintl() 63 orig_xh = xh; in __rintl() 73 xh -= hi; in __rintl() 80 xh -= lo; in __rintl() 98 if (xh < 0.0 || (xh == 0.0 && xl < 0.0)) in __rintl() 104 if (xh > 0.0 || (xh == 0.0 && xl > 0.0)) in __rintl() 111 xh = hi; in __rintl() 117 xh = -__builtin_fabs (xh); in __rintl() 120 math_force_eval (xh); in __rintl() [all …]
|
A D | s_roundl.c | 36 double xh, xl, hi, lo; in __roundl() local 38 ldbl_unpack (x, &xh, &xl); in __roundl() 45 hi = round (xh); in __roundl() 46 if (hi != xh) in __roundl() 54 if (xh > 0 && xl < 0) in __roundl() 55 xh = hi - 1; in __roundl() 57 xh = hi + 1; in __roundl() 59 xh = hi; in __roundl() 62 xh = hi; in __roundl() 80 xh = hi; in __roundl() [all …]
|
A D | s_lrintl.c | 31 double xh, xl; in __lrintl() local 61 xh -= hi; in __lrintl() 73 xh = 1.0; in __lrintl() 77 hi = (long) xh; in __lrintl() 78 xh -= hi; in __lrintl() 94 xh -= lo; in __lrintl() 108 if (xh < 0.0) in __lrintl() 115 if (res > 0 && (xh < 0.0 || (xh == 0.0 && xl < 0.0))) in __lrintl() 117 else if (res < 0 && (xh > 0.0 || (xh == 0.0 && xl > 0.0))) in __lrintl() 123 if (xh > 0.0 || (xh == 0.0 && xl > 0.0)) in __lrintl() [all …]
|
A D | s_llrintl.c | 31 double xh, xl; in __llrintl() local 59 xh = 1.0; in __llrintl() 64 xh -= hi; in __llrintl() 79 xh -= lo; in __llrintl() 86 if (fabs (xh) < 0.5 in __llrintl() 93 if (xh < 0.0) in __llrintl() 100 if (res > 0 && (xh < 0.0 || (xh == 0.0 && xl < 0.0))) in __llrintl() 102 else if (res < 0 && (xh > 0.0 || (xh == 0.0 && xl > 0.0))) in __llrintl() 108 if (xh > 0.0 || (xh == 0.0 && xl > 0.0)) in __llrintl() 113 if (xh < 0.0 || (xh == 0.0 && xl < 0.0)) in __llrintl() [all …]
|
A D | s_roundevenl.c | 27 double xh, xl, hi; in __roundevenl() local 29 ldbl_unpack (x, &xh, &xl); in __roundevenl() 31 if (xh != 0 && isfinite (xh)) in __roundevenl() 34 if (hi != xh) in __roundevenl() 40 double diff = hi - xh; in __roundevenl() 44 xh = hi - 1; in __roundevenl() 46 xh = hi + 1; in __roundevenl() 48 xh = hi; in __roundevenl() 51 xh = hi; in __roundevenl() 61 xh = hi; in __roundevenl() [all …]
|
A D | s_lroundl.c | 30 double xh, xl; in __lroundl() local 57 xh -= hi; in __lroundl() 69 xh = 1.0; in __lroundl() 73 hi = (long) xh; in __lroundl() 74 xh -= hi; in __lroundl() 79 lo = (long) xh; in __lroundl() 90 xh -= lo; in __lroundl() 94 if (xh > 0.5) in __lroundl() 98 else if (xh == 0.5) in __lroundl() 120 if (xh > 0.0) in __lroundl() [all …]
|
A D | s_truncl.c | 35 double xh, xl, hi, lo; in __truncl() local 37 ldbl_unpack (x, &xh, &xl); in __truncl() 40 if (__builtin_expect (xh != 0.0 in __truncl() 44 hi = trunc (xh); in __truncl() 45 if (hi != xh) in __truncl() 49 xh = hi; in __truncl() 55 lo = xh > 0 ? floor (xl) : ceil (xl); in __truncl() 56 xh = hi; in __truncl() 58 ldbl_canonicalize_int (&xh, &xl); in __truncl() 63 xh += xh; in __truncl() [all …]
|
A D | s_llroundl.c | 30 double xh, xl; in __llroundl() local 55 xh = 1.0; in __llroundl() 59 hi = (long long) xh; in __llroundl() 60 xh -= hi; in __llroundl() 64 lo = (long long) xh; in __llroundl() 75 xh -= lo; in __llroundl() 79 if (xh > 0.5) in __llroundl() 83 else if (xh == 0.5) in __llroundl() 88 else if (-xh > 0.5) in __llroundl() 105 if (xh > 0.0) in __llroundl() [all …]
|
A D | s_ceill.c | 33 double xh, xl, hi, lo; in __ceill() local 35 ldbl_unpack (x, &xh, &xl); in __ceill() 38 if (__builtin_expect (xh != 0.0 in __ceill() 39 && __builtin_isless (__builtin_fabs (xh), in __ceill() 42 hi = ceil (xh); in __ceill() 43 if (hi != xh) in __ceill() 47 xh = hi; in __ceill() 54 xh = hi; in __ceill() 56 ldbl_canonicalize_int (&xh, &xl); in __ceill() 61 xh += xh; in __ceill() [all …]
|
A D | s_floorl.c | 33 double xh, xl, hi, lo; in __floorl() local 35 ldbl_unpack (x, &xh, &xl); in __floorl() 38 if (__builtin_expect (xh != 0.0 in __floorl() 39 && __builtin_isless (__builtin_fabs (xh), in __floorl() 42 hi = floor (xh); in __floorl() 43 if (hi != xh) in __floorl() 47 xh = hi; in __floorl() 54 xh = hi; in __floorl() 56 ldbl_canonicalize_int (&xh, &xl); in __floorl() 61 xh += xh; in __floorl() [all …]
|
A D | math_ldbl.h | 219 double xh, xl; in ldbl_canonicalize() local 221 xh = *a + *aa; in ldbl_canonicalize() 222 xl = (*a - xh) + *aa; in ldbl_canonicalize() 223 *a = xh; in ldbl_canonicalize()
|
/sysdeps/powerpc/fpu/ |
A D | math_ldbl.h | 30 register double xh __asm__ ("fr1"); in ldbl_pack_ppc() 32 xh = a; in ldbl_pack_ppc() 34 __asm__ ("" : "=f" (x) : "f" (xh), "f" (xl)); in ldbl_pack_ppc() 42 register double xh __asm__ ("fr1"); in ldbl_unpack_ppc() 45 __asm__ ("" : "=f" (xh), "=f" (xl) : "f" (x)); in ldbl_unpack_ppc() 46 *a = xh; in ldbl_unpack_ppc()
|
A D | s_logbl.c | 33 double xh, xl; in __logbl() local 41 ldbl_unpack (x, &xh, &xl); in __logbl() 42 EXTRACT_WORDS64 (hx, xh); in __logbl() 48 : "d" (xh), "d" (0x7ff0000000000000ULL)); in __logbl() 52 return (xh * xh); in __logbl()
|