Merge commit 'a39d4083cab589d7cd6a13e8a4b8db8875261d75'

[gnulib.git] / lib / atanl.c

diff --git a/lib/atanl.c b/lib/atanl.c
index 22a882d..88284a6 100644 (file)
--- a/lib/atanl.c
+++ b/lib/atanl.c
@@ -18,6 +18,18 @@
 /* Specification.  */
 #include <math.h>
 
+#if HAVE_SAME_LONG_DOUBLE_AS_DOUBLE
+
+long double
+atanl (long double x)
+{
+  return atan (x);
+}
+
+#else
+
+/* Code based on glibc/sysdeps/ieee754/ldbl-128/s_atanl.c.  */
+
 /*                                                      s_atanl.c
  *
  *      Inverse circular tangent for 128-bit long double precision
@@ -222,3 +234,5 @@ atanl (long double x)
   else
     return u;
 }
+
+#endif