Update to musl 1.2.0.

[wasi-libc.git] / libc-top-half / musl / src / complex / catanl.c

diff --git a/libc-top-half/musl/src/complex/catanl.c b/libc-top-half/musl/src/complex/catanl.c
index a9fc02db03012604488c7c867cb3618b9212f177..e62526c00672b42b91592334b2f113326c40e9a7 100644 (file)
--- a/libc-top-half/musl/src/complex/catanl.c
+++ b/libc-top-half/musl/src/complex/catanl.c
@@ -97,30 +97,18 @@ long double complex catanl(long double complex z)
        x = creall(z);
        y = cimagl(z);
 
-       if ((x == 0.0L) && (y > 1.0L))
-               goto ovrf;
-
        x2 = x * x;
        a = 1.0L - x2 - (y * y);
-       if (a == 0.0L)
-               goto ovrf;
 
        t = atan2l(2.0L * x, a) * 0.5L;
        w = redupil(t);
 
        t = y - 1.0L;
        a = x2 + (t * t);
-       if (a == 0.0L)
-               goto ovrf;
 
        t = y + 1.0L;
        a = (x2 + (t * t)) / a;
-       w = w + (0.25L * logl(a)) * I;
-       return w;
-
-ovrf:
-       // FIXME
-       w = LDBL_MAX + LDBL_MAX * I;
+       w = CMPLXF(w, 0.25L * logl(a));
        return w;
 }
 #endif