From 13e400b3559666b5e584bdf6f8450aad826b43ae Mon Sep 17 00:00:00 2001
From: Rich Felker <dalias@aerifal.cx>
Date: Thu, 22 Mar 2012 15:54:55 -0400
Subject: add creal/cimag macros in complex.h (and use them in the functions
 defs)

---
 src/complex/cimag.c  | 3 +--
 src/complex/cimagf.c | 3 +--
 src/complex/cimagl.c | 3 +--
 src/complex/creal.c  | 4 ++--
 src/complex/crealf.c | 4 ++--
 src/complex/creall.c | 4 ++--
 6 files changed, 9 insertions(+), 12 deletions(-)

(limited to 'src/complex')

diff --git a/src/complex/cimag.c b/src/complex/cimag.c
index 5e1ad46b..00955641 100644
--- a/src/complex/cimag.c
+++ b/src/complex/cimag.c
@@ -2,6 +2,5 @@
 
 double (cimag)(double complex z)
 {
-	union dcomplex u = {z};
-	return u.a[1];
+	return cimag(z);
 }
diff --git a/src/complex/cimagf.c b/src/complex/cimagf.c
index 99fffc58..f7bcd76e 100644
--- a/src/complex/cimagf.c
+++ b/src/complex/cimagf.c
@@ -2,6 +2,5 @@
 
 float (cimagf)(float complex z)
 {
-	union fcomplex u = {z};
-	return u.a[1];
+	return cimagf(z);
 }
diff --git a/src/complex/cimagl.c b/src/complex/cimagl.c
index d9a0780c..9ec24eee 100644
--- a/src/complex/cimagl.c
+++ b/src/complex/cimagl.c
@@ -2,6 +2,5 @@
 
 long double (cimagl)(long double complex z)
 {
-	union lcomplex u = {z};
-	return u.a[1];
+	return cimagl(z);
 }
diff --git a/src/complex/creal.c b/src/complex/creal.c
index 2bb91812..f6703040 100644
--- a/src/complex/creal.c
+++ b/src/complex/creal.c
@@ -1,6 +1,6 @@
 #include <complex.h>
 
-double creal(double complex z)
+double (creal)(double complex z)
 {
-	return z;
+	return creal(z);
 }
diff --git a/src/complex/crealf.c b/src/complex/crealf.c
index 078232f0..5dc3ff1d 100644
--- a/src/complex/crealf.c
+++ b/src/complex/crealf.c
@@ -1,6 +1,6 @@
 #include <complex.h>
 
-float crealf(float complex z)
+float (crealf)(float complex z)
 {
-	return z;
+	return crealf(z);
 }
diff --git a/src/complex/creall.c b/src/complex/creall.c
index 56e64097..fd9dc347 100644
--- a/src/complex/creall.c
+++ b/src/complex/creall.c
@@ -1,6 +1,6 @@
 #include <complex.h>
 
-long double creall(long double complex z)
+long double (creall)(long double complex z)
 {
-	return z;
+	return creall(z);
 }
-- 
cgit v1.2.1