===================================================================
@@ -4407,7 +4407,7 @@
tree t_one = build_one_cst (type);
}
(if (SCALAR_FLOAT_TYPE_P (type))
- (cond (le (abs @0) { t_cst; })
+ (cond (lt (abs @0) { t_cst; })
(rdiv @0 (sqrts (plus (mult @0 @0) { t_one; })))
(copysigns { t_one; } @0))))))
@@ -4427,7 +4427,7 @@
tree t_zero = build_zero_cst (type);
}
(if (SCALAR_FLOAT_TYPE_P (type))
- (cond (le (abs @0) { t_cst; })
+ (cond (lt (abs @0) { t_cst; })
(rdiv { t_one; } (sqrts (plus (mult @0 @0) { t_one; })))
(copysigns { t_zero; } @0))))))
===================================================================
@@ -62,7 +62,7 @@
/* Get first x such that 1 + x*x will overflow */
float fc = nextafterf (sqrtf (__FLT_MAX__ - 1), __FLT_MAX__);
double c = nextafter (sqrt (__DBL_MAX__ - 1), __DBL_MAX__);
- long double lc = nextafter (sqrtl (__LDBL_MAX__ - 1), __LDBL_MAX__);
+ long double lc = nextafterl (sqrtl (__LDBL_MAX__ - 1), __LDBL_MAX__);
/* Force move from FPU to memory, otherwise comparison may
fail due to possible more accurate registers (see 387) */
@@ -90,7 +90,7 @@
if (fy != -1.f || y != -1. || ly != -1.L)
abort ();
-
+
fy = cosatanf (-fc);
y = cosatan (-c);
ly = cosatanl (-lc);