-# strtod.m4 serial 18
-dnl Copyright (C) 2002-2003, 2006-2010 Free Software Foundation, Inc.
+# strtod.m4 serial 22
+dnl Copyright (C) 2002-2003, 2006-2014 Free Software Foundation, Inc.
dnl This file is free software; the Free Software Foundation
dnl gives unlimited permission to copy and/or distribute it,
dnl with or without modifications, as long as this notice is preserved.
AC_DEFUN([gl_FUNC_STRTOD],
[
AC_REQUIRE([gl_STDLIB_H_DEFAULTS])
- dnl Test whether strtod is declared.
- dnl Don't call AC_FUNC_STRTOD, because it does not have the right guess
- dnl when cross-compiling.
- dnl Don't call AC_CHECK_FUNCS([strtod]) because it would collide with the
- dnl ac_cv_func_strtod variable set by the AC_FUNC_STRTOD macro.
- AC_CHECK_DECLS_ONCE([strtod])
- if test $ac_cv_have_decl_strtod != yes; then
- HAVE_STRTOD=0
- else
+ m4_ifdef([gl_FUNC_STRTOD_OBSOLETE], [
+ dnl Test whether strtod is declared.
+ dnl Don't call AC_FUNC_STRTOD, because it does not have the right guess
+ dnl when cross-compiling.
+ dnl Don't call AC_CHECK_FUNCS([strtod]) because it would collide with the
+ dnl ac_cv_func_strtod variable set by the AC_FUNC_STRTOD macro.
+ AC_CHECK_DECLS_ONCE([strtod])
+ if test $ac_cv_have_decl_strtod != yes; then
+ HAVE_STRTOD=0
+ fi
+ ])
+ if test $HAVE_STRTOD = 1; then
AC_CACHE_CHECK([whether strtod obeys C99], [gl_cv_func_strtod_works],
[AC_RUN_IFELSE([AC_LANG_PROGRAM([[
#include <stdlib.h>
return x == y;
}
]], [[
+ int result = 0;
{
/* In some old versions of Linux (2000 or before), strtod mis-parses
strings with leading '+'. */
char *term;
double value = strtod (string, &term);
if (value != 69 || term != (string + 4))
- return 1;
+ result |= 1;
}
{
/* Under Solaris 2.4, strtod returns the wrong value for the
char *term;
strtod (string, &term);
if (term != string && *(term - 1) == 0)
- return 2;
+ result |= 2;
}
{
/* Older glibc and Cygwin mis-parse "-0x". */
double value = strtod (string, &term);
double zero = 0.0;
if (1.0 / value != -1.0 / zero || term != (string + 2))
- return 3;
+ result |= 4;
}
{
/* Many platforms do not parse hex floats. */
char *term;
double value = strtod (string, &term);
if (value != 20.0 || term != (string + 6))
- return 4;
+ result |= 8;
}
{
/* Many platforms do not parse infinities. HP-UX 11.31 parses inf,
errno = 0;
value = strtod (string, &term);
if (value != HUGE_VAL || term != (string + 3) || errno)
- return 5;
+ result |= 16;
}
{
/* glibc 2.7 and cygwin 1.5.24 misparse "nan()". */
char *term;
double value = strtod (string, &term);
if (numeric_equal (value, value) || term != (string + 5))
- return 6;
+ result |= 32;
}
{
/* darwin 10.6.1 misparses "nan(". */
char *term;
double value = strtod (string, &term);
if (numeric_equal (value, value) || term != (string + 3))
- return 7;
+ result |= 64;
}
+ return result;
]])],
[gl_cv_func_strtod_works=yes],
[gl_cv_func_strtod_works=no],
[dnl The last known bugs in glibc strtod(), as of this writing,
- dnl were fixed in version 2.8
+ dnl were fixed in version 2.8
AC_EGREP_CPP([Lucky user],
[
#include <features.h>
#endif
#endif
],
- [gl_cv_func_strtod_works=yes],
+ [gl_cv_func_strtod_works="guessing yes"],
[gl_cv_func_strtod_works="guessing no"])])])
- if test "$gl_cv_func_strtod_works" != yes; then
- REPLACE_STRTOD=1
- fi
- fi
- if test $HAVE_STRTOD = 0 || test $REPLACE_STRTOD = 1; then
- AC_LIBOBJ([strtod])
- gl_PREREQ_STRTOD
+ case "$gl_cv_func_strtod_works" in
+ *yes) ;;
+ *)
+ REPLACE_STRTOD=1
+ ;;
+ esac
fi
])