From: Ulrich Drepper <drepper@redhat.com>
Date: Tue, 9 Dec 1997 23:49:24 +0000 (+0000)
Subject: [NO_LONG_DOUBLE]: Correct cabsl.
X-Git-Tag: cvs/glibc-2_0_6pre3~17
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e8cd5d9ebd545daa9ee46dbe3cc1741dc71fc107;p=thirdparty%2Fglibc.git

[NO_LONG_DOUBLE]: Correct cabsl.
---

diff --git a/sysdeps/libm-ieee754/w_cabs.c b/sysdeps/libm-ieee754/w_cabs.c
index 5313cba4666..eec09d59bbf 100644
--- a/sysdeps/libm-ieee754/w_cabs.c
+++ b/sysdeps/libm-ieee754/w_cabs.c
@@ -20,10 +20,15 @@ __cabs (struct __cabs_complex z)
 weak_alias (__cabs, cabs)
 
 #ifdef NO_LONG_DOUBLE
+struct __cabs_complexl
+{
+  double x, y;
+};
+
 double
 __cabsl (struct __cabs_complexl z)
 {
-	return __hypotl(z.x, z.y);
+	return __hypot(z.x, z.y);
 }
 weak_alias (__cabsl, cabsl)
 #endif