X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Fsinhl.c;h=b305d4d2f3e9c5965bdbf4ddb445adef0168fd85;hb=0a7b4323b0f2b944dbd47a813c0c6e6813e7fd67;hp=14e3371b35aea410eddb2e40818155a26da48071;hpb=5d5ab51862cbd010bdf52dc3b04b0967450bcd1a;p=musl

diff --git a/src/math/sinhl.c b/src/math/sinhl.c
index 14e3371b..b305d4d2 100644
--- a/src/math/sinhl.c
+++ b/src/math/sinhl.c
@@ -8,10 +8,7 @@ long double sinhl(long double x)
 #elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
 long double sinhl(long double x)
 {
-	union {
-		long double f;
-		struct{uint64_t m; uint16_t se; uint16_t pad;} i;
-	} u = {.f = x};
+	union ldshape u = {x};
 	unsigned ex = u.i.se & 0x7fff;
 	long double h, t, absx;
 
@@ -37,4 +34,10 @@ long double sinhl(long double x)
 	t = expl(0.5*absx);
 	return h*t*t;
 }
+#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
+// TODO: broken implementation to make things compile
+long double sinhl(long double x)
+{
+	return sinh(x);
+}
 #endif