diff options
| author | Joseph Myers <joseph@codesourcery.com> | 2015-04-08 17:32:17 +0000 |
|---|---|---|
| committer | Joseph Myers <joseph@codesourcery.com> | 2015-04-08 17:32:17 +0000 |
| commit | 8431838dde9187c061ac64b8d61290e8de021dda (patch) | |
| tree | 4acac47ebfabfa8931fc426364326deadf520e81 /sysdeps/ieee754 | |
| parent | ae63c7ebedcaa57017df4cb8ff0494a4705321ee (diff) | |
| download | glibc-8431838dde9187c061ac64b8d61290e8de021dda.zip glibc-8431838dde9187c061ac64b8d61290e8de021dda.tar.gz glibc-8431838dde9187c061ac64b8d61290e8de021dda.tar.bz2 | |
Fix dbl-64 atan2 in non-default rounding modes (bug 18210, bug 18211).
The dbl-64 implementation of atan2 does computations that expect to
run in round-to-nearest mode, and in other modes the errors can
accumulate to more than the maximum accepted 9ulp. This patch makes
it use FE_TONEAREST internally, similar to other functions with such
issues. Tests that previously produced large errors are added for
atan2 and the closely related carg, clog and clog10 functions.
Tested for x86_64 and x86 and ulps updated accordingly.
[BZ #18210]
[BZ #18211]
* sysdeps/ieee754/dbl-64/e_atan2.c: Include <fenv.h>.
(__ieee754_atan2): Set FE_TONEAREST mode for internal
computations.
* math/auto-libm-test-in: Add more tests of atan2, carg, clog and
clog10.
* math/auto-libm-test-out: Regenerated.
* sysdeps/i386/fpu/libm-test-ulps: Update.
* sysdeps/x86_64/fpu/libm-test-ulps: Likewise.
Diffstat (limited to 'sysdeps/ieee754')
| -rw-r--r-- | sysdeps/ieee754/dbl-64/e_atan2.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/sysdeps/ieee754/dbl-64/e_atan2.c b/sysdeps/ieee754/dbl-64/e_atan2.c index a03ce3e..0c29028 100644 --- a/sysdeps/ieee754/dbl-64/e_atan2.c +++ b/sysdeps/ieee754/dbl-64/e_atan2.c @@ -41,6 +41,7 @@ #include "MathLib.h" #include "uatan.tbl" #include "atnat2.h" +#include <fenv.h> #include <float.h> #include <math.h> #include <math_private.h> @@ -192,6 +193,7 @@ __ieee754_atan2 (double y, double x) return mhpi.d; } + SET_RESTORE_ROUND (FE_TONEAREST); /* either x/y or y/x is very close to zero */ ax = (x < 0) ? -x : x; ay = (y < 0) ? -y : y; |