]> Savannah Git Hosting - gnulib.git/commitdiff
atanl: Simplify for platforms where 'long double' == 'double'.
authorBruno Haible <bruno@clisp.org>
Tue, 11 Oct 2011 09:15:59 +0000 (11:15 +0200)
committerBruno Haible <bruno@clisp.org>
Tue, 11 Oct 2011 09:15:59 +0000 (11:15 +0200)
* lib/atanl.c (atanl) [HAVE_SAME_LONG_DOUBLE_AS_DOUBLE]: New
alternative implementation.
* m4/atanl.m4 (gl_FUNC_ATANL): Require gl_LONG_DOUBLE_VS_DOUBLE.
Determine ATANL_LIBM according to HAVE_SAME_LONG_DOUBLE_AS_DOUBLE.
* modules/atanl (Depends-on): Add atan. Update conditions.

ChangeLog
lib/atanl.c
m4/atanl.m4
modules/atanl

index 01ddd60af286ac908f9c2b9a57f4e7e9b4e30799..702c1fa13d7c4e0d3a661f643f5c3a044674a7c6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2011-10-10  Bruno Haible  <bruno@clisp.org>
+
+       atanl: Simplify for platforms where 'long double' == 'double'.
+       * lib/atanl.c (atanl) [HAVE_SAME_LONG_DOUBLE_AS_DOUBLE]: New
+       alternative implementation.
+       * m4/atanl.m4 (gl_FUNC_ATANL): Require gl_LONG_DOUBLE_VS_DOUBLE.
+       Determine ATANL_LIBM according to HAVE_SAME_LONG_DOUBLE_AS_DOUBLE.
+       * modules/atanl (Depends-on): Add atan. Update conditions.
+
 2011-10-10  Bruno Haible  <bruno@clisp.org>
 
        acosl: Simplify for platforms where 'long double' == 'double'.
index 22a882d4d31a378469dd377d72ef4d5970d4c9cb..4d09c2f2050c4f770b22336ceb1014a84d160fb0 100644 (file)
 /* Specification.  */
 #include <math.h>
 
+#if HAVE_SAME_LONG_DOUBLE_AS_DOUBLE
+
+long double
+atanl (long double x)
+{
+  return atan (x);
+}
+
+#else
+
 /*                                                      s_atanl.c
  *
  *      Inverse circular tangent for 128-bit long double precision
@@ -222,3 +232,5 @@ atanl (long double x)
   else
     return u;
 }
+
+#endif
index 82c9cd409139cb5ba10a1ce9e7dd33a914858189..330ad773f5dbd5eab0bbfe9d7f1b4d99e05f31b7 100644 (file)
@@ -1,4 +1,4 @@
-# atanl.m4 serial 5
+# atanl.m4 serial 6
 dnl Copyright (C) 2010-2011 Free Software Foundation, Inc.
 dnl This file is free software; the Free Software Foundation
 dnl gives unlimited permission to copy and/or distribute it,
@@ -7,6 +7,8 @@ dnl with or without modifications, as long as this notice is preserved.
 AC_DEFUN([gl_FUNC_ATANL],
 [
   AC_REQUIRE([gl_MATH_H_DEFAULTS])
+  AC_REQUIRE([gl_LONG_DOUBLE_VS_DOUBLE])
+
   dnl Persuade glibc <math.h> to declare atanl().
   AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
 
@@ -56,12 +58,17 @@ AC_DEFUN([gl_FUNC_ATANL],
     HAVE_DECL_ATANL=0
     HAVE_ATANL=0
     dnl Find libraries needed to link lib/atanl.c.
-    AC_REQUIRE([gl_FUNC_ISNANL])
-    dnl Append $ISNANL_LIBM to ATANL_LIBM, avoiding gratuitous duplicates.
-    case " $ATANL_LIBM " in
-      *" $ISNANL_LIBM "*) ;;
-      *) ATANL_LIBM="$ATANL_LIBM $ISNANL_LIBM" ;;
-    esac
+    if test $HAVE_SAME_LONG_DOUBLE_AS_DOUBLE = 1; then
+      AC_REQUIRE([gl_FUNC_ATAN])
+      ATANL_LIBM="$ATAN_LIBM"
+    else
+      AC_REQUIRE([gl_FUNC_ISNANL])
+      dnl Append $ISNANL_LIBM to ATANL_LIBM, avoiding gratuitous duplicates.
+      case " $ATANL_LIBM " in
+        *" $ISNANL_LIBM "*) ;;
+        *) ATANL_LIBM="$ATANL_LIBM $ISNANL_LIBM" ;;
+      esac
+    fi
   fi
   AC_SUBST([ATANL_LIBM])
 ])
index 1fd0d9aae7a0f96f2f8c60d2cf110d878b36222d..a600846a31313d240e1ff5654fc0e48525b4dda0 100644 (file)
@@ -8,7 +8,8 @@ m4/atanl.m4
 Depends-on:
 math
 extensions
-isnanl          [test $HAVE_ATANL = 0]
+atan            [test $HAVE_ATANL = 0 && test $HAVE_SAME_LONG_DOUBLE_AS_DOUBLE = 1]
+isnanl          [test $HAVE_ATANL = 0 && test $HAVE_SAME_LONG_DOUBLE_AS_DOUBLE = 0]
 
 configure.ac:
 gl_FUNC_ATANL