X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fmath%2Fatan2l.c;h=0fc901c826f113b5e1b5a1ae1429b717e2520a09;hp=d5a7a5acb02cb3e61e2fc0582d3c14ecd44ecafc;hb=0cbb65479147ecdaa664e88cc2a5a925f3de502f;hpb=9e2a895aaaa4a3985e94ae4f3e24c1af65f9bb34 diff --git a/src/math/atan2l.c b/src/math/atan2l.c index d5a7a5ac..0fc901c8 100644 --- a/src/math/atan2l.c +++ b/src/math/atan2l.c @@ -27,16 +27,7 @@ long double atan2l(long double y, long double x) static const volatile long double tiny = 1.0e-300; static const long double -zero = 0.0; -/* XXX Work around the fact that gcc truncates long double constants on i386 */ -static const volatile double -pi1 = 3.14159265358979311600e+00, /* 0x1.921fb54442d18p+1 */ -pi2 = 1.22514845490862001043e-16; /* 0x1.1a80000000000p-53 */ -#define pi ((long double)pi1 + pi2) -#if 0 -static const long double pi = 3.14159265358979323846264338327950280e+00L; -#endif long double atan2l(long double y, long double x) { @@ -83,8 +74,8 @@ long double atan2l(long double y, long double x) } } else { switch(m) { - case 0: return zero; /* atan(+...,+INF) */ - case 1: return -zero; /* atan(-...,+INF) */ + case 0: return 0.0; /* atan(+...,+INF) */ + case 1: return -0.0; /* atan(-...,+INF) */ case 2: return pi+tiny; /* atan(+...,-INF) */ case 3: return -pi-tiny; /* atan(-...,-INF) */ }