X-Git-Url: http://nsz.repo.hu/git/?p=libm;a=blobdiff_plain;f=src%2Fmath%2F__rem_pio2l.h;h=130a8f0474a68e3cd5e4fbed10dda63e5ed97a42;hp=3a747b18eda5e1d05f2c8503aa63001d2cddaa38;hb=0498709e07bf9dd0546a61220cd2a27fcd186ce0;hpb=da2f1654bc418e800e8dce3e2caf80d36692e0b5 diff --git a/src/math/__rem_pio2l.h b/src/math/__rem_pio2l.h index 3a747b1..130a8f0 100644 --- a/src/math/__rem_pio2l.h +++ b/src/math/__rem_pio2l.h @@ -17,7 +17,7 @@ /* ld80 version of __rem_pio2(x,y) * * return the remainder of x rem pi/2 in y[0]+y[1] - * use __rem_pio2_slow() + * use __rem_pio2_large() for large x */ #define BIAS (LDBL_MAX_EXP - 1) @@ -135,7 +135,7 @@ static inline int __rem_pio2l(long double x, long double *y) nx = 3; while (tx[nx-1] == zero) nx--; /* skip zero term */ - n = __rem_pio2_slow(tx,ty,e0,nx,2); + n = __rem_pio2_large(tx,ty,e0,nx,2); r = (long double)ty[0] + ty[1]; w = ty[1] - (r - ty[0]); if (expsign < 0) {