X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fmath%2F__tan.c;h=fc739f95fd3a26c91799809633f0d2ec459305cb;hp=01e3fe48baccec982e262ea65b1fb9c8162fce38;hb=e216951f509b71da193da2fc63e25b998740d58b;hpb=97721a5508415a2f10eb068e022093811c9ff8be diff --git a/src/math/__tan.c b/src/math/__tan.c index 01e3fe48..fc739f95 100644 --- a/src/math/__tan.c +++ b/src/math/__tan.c @@ -65,7 +65,7 @@ pio4lo = 3.06161699786838301793e-17; /* 3C81A626, 33145C07 */ double __tan(double x, double y, int iy) { - double z, r, v, w, s, sign; + double_t z, r, v, w, s, sign; int32_t ix, hx; GET_HIGH_WORD(hx,x); @@ -106,7 +106,8 @@ double __tan(double x, double y, int iy) * -1.0 / (x+r) here */ /* compute -1.0 / (x+r) accurately */ - double a, t; + double_t a; + double z, t; z = w; SET_LOW_WORD(z,0); v = r - (z - x); /* z+v = r+x */