Message ID | alpine.DEB.2.10.1504081714390.25740@digraph.polyomino.org.uk |
---|---|
State | New |
Headers | show |
diff --git a/math/auto-libm-test-in b/math/auto-libm-test-in index 939f6ea..d0026d5 100644 --- a/math/auto-libm-test-in +++ b/math/auto-libm-test-in @@ -240,6 +240,8 @@ atan 1e6 atan 0x1p-100 atan 0x1p-600 atan 0x1p-10000 +atan -0x3.b02d84p-4 +atan -0x3.3fb708p-4 atan min atan -min atan min_subnorm diff --git a/sysdeps/ieee754/dbl-64/s_atan.c b/sysdeps/ieee754/dbl-64/s_atan.c index 7b598f1..5035ae8 100644 --- a/sysdeps/ieee754/dbl-64/s_atan.c +++ b/sysdeps/ieee754/dbl-64/s_atan.c @@ -41,6 +41,7 @@ #include "MathLib.h" #include "uatan.tbl" #include "atnat.h" +#include <fenv.h> #include <float.h> #include <math.h> #include <math_private.h> @@ -81,6 +82,7 @@ atan (double x) return x + x; /* Regular values of x, including denormals +-0 and +-INF */ + SET_RESTORE_ROUND (FE_TONEAREST); u = (x < 0) ? -x : x; if (u < C) {