diff options
| author | Paolo Bonzini <bonzini@gnu.org> | 2008-04-15 15:25:38 +0200 |
|---|---|---|
| committer | Paolo Bonzini <bonzini@gnu.org> | 2008-04-15 15:26:47 +0200 |
| commit | a5c02266250d51d94c137f4fca8bec8e7654ff8c (patch) | |
| tree | 829b4689c108a439e836897e2b1ad3d50e48af31 /lib/tanl.c | |
| parent | 7563f3f5af6f0c71e1ae6d45fb125ccee1f45ebc (diff) | |
| download | gnulib-a5c02266250d51d94c137f4fca8bec8e7654ff8c.tar.gz | |
fix typos in mathl
2008-04-15 Paolo Bonzini <bonzini@gnu.org>
* lib/tanl.c (kernel_tanl): Rename flag to invert, initialize it
to 0.
* lib/trigl.c (ieee754_rem_pio2l): Fix range checks.
Diffstat (limited to 'lib/tanl.c')
| -rw-r--r-- | lib/tanl.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/tanl.c b/lib/tanl.c index 64a84b86f8..11b63adfcb 100644 --- a/lib/tanl.c +++ b/lib/tanl.c @@ -125,7 +125,7 @@ long double kernel_tanl (long double x, long double y, int iy) { long double z, r, v, w, s, u, u1; - int flag, sign; + int invert = 0, sign; sign = 1; if (x < 0) @@ -147,7 +147,7 @@ kernel_tanl (long double x, long double y, int iy) } if (x >= 0.6743316650390625) /* |x| >= 0.6743316650390625 */ { - flag = 1; + invert = 1; z = pio4hi - x; w = pio4lo - y; @@ -163,7 +163,7 @@ kernel_tanl (long double x, long double y, int iy) r = y + z * (s * r + y); r += TH * s; w = x + r; - if (flag) + if (invert) { v = (long double) iy; w = (v - 2.0 * (x - (w * w / (w + v) - r))); |