X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fcomplex%2Fcacoshf.c;h=8bd80581ae0d7d2ad42ceed52332570078f50943;hb=7c0c7a75ec8ecf3eedefc40bb4dae5aaa76d7108;hp=37ff8800ebc5710c708fc2151f75a084ded3a177;hpb=b69f695acedd4ce2798ef9ea28d834ceccc789bd;p=musl

diff --git a/src/complex/cacoshf.c b/src/complex/cacoshf.c
index 37ff8800..8bd80581 100644
--- a/src/complex/cacoshf.c
+++ b/src/complex/cacoshf.c
@@ -1,7 +1,10 @@
-#include "libm.h"
+#include "complex_impl.h"
 
 float complex cacoshf(float complex z)
 {
+	int zineg = signbit(cimagf(z));
+
 	z = cacosf(z);
-	return cpackf(-cimagf(z), crealf(z));
+	if (zineg) return CMPLXF(cimagf(z), -crealf(z));
+	else       return CMPLXF(-cimagf(z), crealf(z));
 }