Mercurial > hg > octave-lojdl > gnulib-hg

changeset 16402:2c3775efa261

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
atanl: Provide function definition on MSVC. * m4/atanl.m4 (gl_FUNC_ATANL): Test also whether atanl can be used as a function pointer. * lib/math.in.h (atanl): Undefine if it does not exist as a function.
author Bruno Haible <bruno@clisp.org>
date Sat, 25 Feb 2012 01:45:18 +0100
parents 2e3db69dec4a
children 580de3212c9d
files ChangeLog lib/math.in.h m4/atanl.m4
diffstat 3 files changed, 15 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2012-02-24  Bruno Haible  <bruno@clisp.org>
+
+	atanl: Provide function definition on MSVC.
+	* m4/atanl.m4 (gl_FUNC_ATANL): Test also whether atanl can be used as a
+	function pointer.
+	* lib/math.in.h (atanl): Undefine if it does not exist as a function.
+
 2012-02-24  Bruno Haible  <bruno@clisp.org>
 
 	acosl: Provide function definition on MSVC.
--- a/lib/math.in.h
+++ b/lib/math.in.h
@@ -225,6 +225,7 @@
 
 #if @GNULIB_ATANL@
 # if !@HAVE_ATANL@ || !@HAVE_DECL_ATANL@
+#  undef atanl
 _GL_FUNCDECL_SYS (atanl, long double, (long double x));
 # endif
 _GL_CXXALIAS_SYS (atanl, long double, (long double x));
--- a/m4/atanl.m4
+++ b/m4/atanl.m4
@@ -1,4 +1,4 @@
-# atanl.m4 serial 6
+# atanl.m4 serial 7
 dnl Copyright (C) 2010-2012 Free Software Foundation, Inc.
 dnl This file is free software; the Free Software Foundation
 dnl gives unlimited permission to copy and/or distribute it,
@@ -22,8 +22,10 @@
              # define __NO_MATH_INLINES 1 /* for glibc */
              #endif
              #include <math.h>
+             long double (*funcptr) (long double) = atanl;
              long double x;]],
-           [[return atanl (x) > 1;]])],
+           [[return funcptr (x) > 1
+                    || atanl (x) > 1;]])],
         [gl_cv_func_atanl_no_libm=yes],
         [gl_cv_func_atanl_no_libm=no])
     ])
@@ -39,8 +41,10 @@
                # define __NO_MATH_INLINES 1 /* for glibc */
                #endif
                #include <math.h>
+               long double (*funcptr) (long double) = atanl;
                long double x;]],
-             [[return atanl (x) > 1;]])],
+             [[return funcptr (x) > 1
+                      || atanl (x) > 1;]])],
           [gl_cv_func_atanl_in_libm=yes],
           [gl_cv_func_atanl_in_libm=no])
         LIBS="$save_LIBS"