diff options
| author | Ulrich Drepper <drepper@redhat.com> | 1998-07-29 14:52:00 +0000 |
|---|---|---|
| committer | Ulrich Drepper <drepper@redhat.com> | 1998-07-29 14:52:00 +0000 |
| commit | 786a5421b89a0076d494dbea89bca8ae66aa48da (patch) | |
| tree | a633da581c7f7917f8d4d24a5cb5410b218ee01f /sysdeps/libm-ieee754/s_csqrtl.c | |
| parent | ec986e237a6c0fe52f172c254d3da2ef57b85eb2 (diff) | |
Update.
* Rules (tests): Depend on tests-static only if build-static == yes.
* misc/Makefile (install-lib): Compile libbsd-compat.a and libg.a
only if build-static == yes.
1998-07-29 12:58 Ulrich Drepper <drepper@cygnus.com>
* sysdeps/generic/glob.c: Winblowz compatibility stuff.
Patch received from Paul D. Smith <psmith@BayNetworks.COM>.
1998-07-29 Andreas Jaeger <aj@arthur.rhein-neckar.de>
* sunrpc/clnt_unix.c (__msgwrite)[!SCM_CRED]: Add return
statement, fix typo.
* sunrpc/svc_unix.c (__msgwrite)[!SCM_CRED]: Likewise.
1998-07-29 Andreas Jaeger <aj@arthur.rhein-neckar.de>
Diffstat (limited to 'sysdeps/libm-ieee754/s_csqrtl.c')
| -rw-r--r-- | sysdeps/libm-ieee754/s_csqrtl.c | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/sysdeps/libm-ieee754/s_csqrtl.c b/sysdeps/libm-ieee754/s_csqrtl.c index 4b7ed983d8..b806bc6785 100644 --- a/sysdeps/libm-ieee754/s_csqrtl.c +++ b/sysdeps/libm-ieee754/s_csqrtl.c @@ -84,7 +84,6 @@ __csqrtl (__complex__ long double x) } else { -#if 0 long double d, r, s; d = __ieee754_hypotl (__real__ x, __imag__ x); @@ -98,20 +97,11 @@ __csqrtl (__complex__ long double x) else { s = __ieee754_sqrtl (0.5L * d - 0.5L * __real__ x); - r = (0.5L * __imag__ x) / s; + r = fabsl ((0.5L * __imag__ x) / s); } __real__ res = r; __imag__ res = __copysignl (s, __imag__ x); -#else - long double d, imag; - - d = __ieee754_hypotl (__real__ x, __imag__ x); - imag = __ieee754_sqrtl (0.5 * (d - __real__ x)); - - __real__ res = __ieee754_sqrtl (0.5 * (d + __real__ x)); - __imag__ res = __copysignl (imag, __imag__ x); -#endif } } |