diff options
author | Ulrich Drepper <drepper@redhat.com> | 1997-11-19 23:44:23 +0000 |
---|---|---|
committer | Ulrich Drepper <drepper@redhat.com> | 1997-11-19 23:44:23 +0000 |
commit | 816ce03a338d7a3127d707bc7da2887158b5794d (patch) | |
tree | 6402a716a5c7cd8adf92e1badeb9e1cedc61ca20 /sysdeps/libm-ieee754 | |
parent | 24f24fa2c86a2aac7322b540eda0a951d7e9311d (diff) |
Define __cabs_complex locally and switch to ISO C form.
Diffstat (limited to 'sysdeps/libm-ieee754')
-rw-r--r-- | sysdeps/libm-ieee754/w_cabs.c | 11 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_cabsf.c | 10 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_cabsl.c | 8 |
3 files changed, 20 insertions, 9 deletions
diff --git a/sysdeps/libm-ieee754/w_cabs.c b/sysdeps/libm-ieee754/w_cabs.c index bf62f22be3..5313cba466 100644 --- a/sysdeps/libm-ieee754/w_cabs.c +++ b/sysdeps/libm-ieee754/w_cabs.c @@ -7,9 +7,13 @@ #include <math.h> +struct __cabs_complex +{ + double x, y; +}; + double -__cabs(z) - struct __cabs_complex z; +__cabs (struct __cabs_complex z) { return __hypot(z.x, z.y); } @@ -17,8 +21,7 @@ weak_alias (__cabs, cabs) #ifdef NO_LONG_DOUBLE double -__cabsl(z) - struct __cabs_complexl z; +__cabsl (struct __cabs_complexl z) { return __hypotl(z.x, z.y); } diff --git a/sysdeps/libm-ieee754/w_cabsf.c b/sysdeps/libm-ieee754/w_cabsf.c index 20ff5b7744..6b6dd8d131 100644 --- a/sysdeps/libm-ieee754/w_cabsf.c +++ b/sysdeps/libm-ieee754/w_cabsf.c @@ -1,6 +1,6 @@ /* * cabsf() wrapper for hypotf(). - * + * * Written by J.T. Conklin, <jtc@wimsey.com> * Placed into the Public Domain, 1994. */ @@ -8,9 +8,13 @@ #include "math.h" #include "math_private.h" +struct __cabs_complexf +{ + float x, y; +}; + float -__cabsf(z) - struct __cabs_complexf z; +__cabsf (struct __cabs_complexf z) { return __hypotf(z.x, z.y); } diff --git a/sysdeps/libm-ieee754/w_cabsl.c b/sysdeps/libm-ieee754/w_cabsl.c index 21ef860a95..f4ae170e53 100644 --- a/sysdeps/libm-ieee754/w_cabsl.c +++ b/sysdeps/libm-ieee754/w_cabsl.c @@ -9,9 +9,13 @@ #include <math.h> +struct __cabs_complexl +{ + long double x, y; +}; + long double -__cabsl(z) - struct __cabs_complexl z; +__cabsl (struct __cabs_complexl z) { return __hypotl(z.x, z.y); } |