X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fmath%2Fatan.c;h=5a1d33e6a05c644610933b1bea8ea8e39f3f99f1;hp=7fd8a3b8a1a35f22a7b61345f20ffb32beea8cdd;hb=e216951f509b71da193da2fc63e25b998740d58b;hpb=b12a73d5bf595b7fbb73db30c6bb144078e86ef5 diff --git a/src/math/atan.c b/src/math/atan.c index 7fd8a3b8..5a1d33e6 100644 --- a/src/math/atan.c +++ b/src/math/atan.c @@ -62,7 +62,7 @@ static const double aT[] = { double atan(double x) { - double w,s1,s2,z; + double_t w,s1,s2,z; uint32_t ix,sign; int id; @@ -72,13 +72,13 @@ double atan(double x) if (ix >= 0x44100000) { /* if |x| >= 2^66 */ if (isnan(x)) return x; - z = atanhi[3] + 0x1p-1000; + z = atanhi[3] + 0x1p-120f; return sign ? -z : z; } if (ix < 0x3fdc0000) { /* |x| < 0.4375 */ if (ix < 0x3e400000) { /* |x| < 2^-27 */ /* raise inexact if x!=0 */ - FORCE_EVAL(x + 0x1p1000); + FORCE_EVAL(x + 0x1p120f); return x; } id = -1;