diff options
Diffstat (limited to 'sysdeps/libm-ieee754/s_clog10l.c')
| -rw-r--r-- | sysdeps/libm-ieee754/s_clog10l.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sysdeps/libm-ieee754/s_clog10l.c b/sysdeps/libm-ieee754/s_clog10l.c index 70940f6863..186eba25cd 100644 --- a/sysdeps/libm-ieee754/s_clog10l.c +++ b/sysdeps/libm-ieee754/s_clog10l.c @@ -1,5 +1,5 @@ /* Compute complex base 10 logarithm. - Copyright (C) 1997 Free Software Foundation, Inc. + Copyright (C) 1997, 1998 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. @@ -34,7 +34,7 @@ __clog10l (__complex__ long double x) if (rcls == FP_ZERO && icls == FP_ZERO) { /* Real and imaginary part are 0.0. */ - __imag__ result = signbit (__real__ x) ? M_PI : 0.0; + __imag__ result = signbit (__real__ x) ? M_PIl : 0.0; __imag__ result = __copysignl (__imag__ result, __imag__ x); /* Yes, the following line raises an exception. */ __real__ result = -1.0 / fabsl (__real__ x); @@ -44,7 +44,7 @@ __clog10l (__complex__ long double x) /* Neither real nor imaginary part is NaN. */ __real__ result = __ieee754_log10l (__ieee754_hypotl (__real__ x, __imag__ x)); - __imag__ result = M_LOG10E * __ieee754_atan2l (__imag__ x, __real__ x); + __imag__ result = M_LOG10El * __ieee754_atan2l (__imag__ x, __real__ x); } else { |