Mercurial > gnulib
view m4/hypotl.m4 @ 39194:a84ae461a2f6
Add cross-compilation results for GNU/Hurd.
* m4/calloc.m4: Add GNU/Hurd guess.
* m4/cbrtl.m4: Likewise.
* m4/ceil.m4: Likewise.
* m4/ceilf.m4: Likewise.
* m4/ceill.m4: Likewise.
* m4/chown.m4: Likewise.
* m4/duplocale.m4: Likewise.
* m4/exp2l.m4: Likewise.
* m4/expm1.m4: Likewise.
* m4/fchdir.m4: Likewise.
* m4/floor.m4: Likewise.
* m4/floorf.m4: Likewise.
* m4/fmod.m4: Likewise.
* m4/fmodf.m4: Likewise.
* m4/fmodl.m4: Likewise.
* m4/getcwd.m4: Likewise.
* m4/getgroups.m4: Likewise.
* m4/gettimeofday.m4: Likewise.
* m4/hypot.m4: Likewise.
* m4/hypotf.m4: Likewise.
* m4/hypotl.m4: Likewise.
* m4/link-follow.m4: Likewise.
* m4/link.m4: Likewise.
* m4/linkat.m4: Likewise.
* m4/log.m4: Likewise.
* m4/log10.m4: Likewise.
* m4/log10f.m4: Likewise.
* m4/log1p.m4: Likewise.
* m4/log1pf.m4: Likewise.
* m4/log1pl.m4: Likewise.
* m4/log2.m4: Likewise.
* m4/log2f.m4: Likewise.
* m4/logf.m4: Likewise.
* m4/lstat.m4: Likewise.
* m4/malloc.m4: Likewise.
* m4/mbrlen.m4: Likewise.
* m4/mbrtowc.m4: Likewise.
* m4/mkdir.m4: Likewise.
* m4/mkfifo.m4: Likewise.
* m4/mknod.m4: Likewise.
* m4/mkstemp.m4: Likewise.
* m4/modf.m4: Likewise.
* m4/modff.m4: Likewise.
* m4/modfl.m4: Likewise.
* m4/printf.m4: Likewise.
* m4/pselect.m4: Likewise.
* m4/ptsname.m4: Likewise.
* m4/putenv.m4: Likewise.
* m4/readlink.m4: Likewise.
* m4/realloc.m4: Likewise.
* m4/remainder.m4: Likewise.
* m4/remainderf.m4: Likewise.
* m4/remainderl.m4: Likewise.
* m4/rmdir.m4: Likewise.
* m4/round.m4: Likewise.
* m4/roundf.m4: Likewise.
* m4/roundl.m4: Likewise.
* m4/select.m4: Likewise.
* m4/setenv.m4: Likewise.
* m4/signbit.m4: Likewise.
* m4/sleep.m4: Likewise.
* m4/stat.m4: Likewise.
* m4/strerror.m4: Likewise.
* m4/strtok_r.m4: Likewise.
* m4/symlink.m4: Likewise.
* m4/symlinkat.m4: Likewise.
* m4/trunc.m4: Likewise.
* m4/truncf.m4: Likewise.
* m4/truncl.m4: Likewise.
* m4/tzset.m4: Likewise.
* m4/ungetc.m4: Likewise.
* m4/usleep.m4: Likewise.
* m4/wcwidth.m4: Likewise.
author | Samuel Thibault <samuel.thibault@gnu.org> |
---|---|
date | Fri, 29 Dec 2017 17:30:07 +0100 |
parents | 5c951c71f25c |
children | 10eb9086bea0 |
line wrap: on
line source
# hypotl.m4 serial 8 dnl Copyright (C) 2012-2017 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_HYPOTL], [ m4_divert_text([DEFAULTS], [gl_hypotl_required=plain]) AC_REQUIRE([gl_MATH_H_DEFAULTS]) AC_REQUIRE([gl_FUNC_HYPOT]) dnl Persuade glibc <math.h> to declare hypotl(). AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) dnl Test whether hypotl() exists. Assume that hypotl(), if it exists, is dnl defined in the same library as hypot(). save_LIBS="$LIBS" LIBS="$LIBS $HYPOT_LIBM" AC_CHECK_FUNCS([hypotl]) LIBS="$save_LIBS" if test $ac_cv_func_hypotl = yes; then HYPOTL_LIBM="$HYPOT_LIBM" save_LIBS="$LIBS" LIBS="$LIBS $HYPOTL_LIBM" gl_FUNC_HYPOTL_WORKS LIBS="$save_LIBS" case "$gl_cv_func_hypotl_works" in *yes) ;; *) REPLACE_HYPOTL=1 ;; esac m4_ifdef([gl_FUNC_HYPOTL_IEEE], [ if test $gl_hypotl_required = ieee && test $REPLACE_HYPOTL = 0; then AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles AC_CACHE_CHECK([whether hypotl works according to ISO C 99 with IEC 60559], [gl_cv_func_hypotl_ieee], [ save_LIBS="$LIBS" LIBS="$LIBS $HYPOTL_LIBM" AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #ifndef __NO_MATH_INLINES # define __NO_MATH_INLINES 1 /* for glibc */ #endif #include <math.h> /* Compare two numbers with ==. This is a separate function because IRIX 6.5 "cc -O" miscompiles an 'x == x' test. */ static int numeric_equal (long double x, long double y) { return x == y; } static long double dummy (long double x, long double y) { return 0; } long double zero; long double one = 1.0L; int main (int argc, char *argv[]) { long double (*my_hypotl) (long double, long double) = argc ? hypotl : dummy; long double f; /* Test hypotl(NaN,Infinity). This test fails on OSF/1 5.1 and native Windows. */ f = my_hypotl (zero / zero, one / zero); if (!numeric_equal (f, f)) return 1; return 0; } ]])], [gl_cv_func_hypotl_ieee=yes], [gl_cv_func_hypotl_ieee=no], [case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_hypotl_ieee="guessing yes" ;; # Guess yes on native Windows. mingw*) gl_cv_func_hypotl_ieee="guessing yes" ;; # If we don't know, assume the worst. *) gl_cv_func_hypotl_ieee="guessing no" ;; esac ]) LIBS="$save_LIBS" ]) case "$gl_cv_func_hypotl_ieee" in *yes) ;; *) REPLACE_HYPOTL=1 ;; esac fi ]) else HAVE_HYPOTL=0 dnl If the function is declared but does not appear to exist, it may be dnl defined as an inline function. In order to avoid a conflict, we have dnl to define rpl_hypotl, not hypotl. AC_CHECK_DECLS([hypotl], [REPLACE_HYPOTL=1], , [[#include <math.h>]]) fi if test $HAVE_HYPOTL = 0 || test $REPLACE_HYPOTL = 1; then dnl Find libraries needed to link lib/hypotl.c. if test $HAVE_SAME_LONG_DOUBLE_AS_DOUBLE = 1; then HYPOTL_LIBM="$HYPOT_LIBM" else AC_REQUIRE([gl_FUNC_FABSL]) AC_REQUIRE([gl_FUNC_FREXPL]) AC_REQUIRE([gl_FUNC_LDEXPL]) AC_REQUIRE([gl_FUNC_SQRTL]) HYPOTL_LIBM= dnl Append $FABSL_LIBM to HYPOTL_LIBM, avoiding gratuitous duplicates. case " $HYPOTL_LIBM " in *" $FABSL_LIBM "*) ;; *) HYPOTL_LIBM="$HYPOTL_LIBM $FABSL_LIBM" ;; esac dnl Append $FREXPL_LIBM to HYPOTL_LIBM, avoiding gratuitous duplicates. case " $HYPOTL_LIBM " in *" $FREXPL_LIBM "*) ;; *) HYPOTL_LIBM="$HYPOTL_LIBM $FREXPL_LIBM" ;; esac dnl Append $LDEXPL_LIBM to HYPOTL_LIBM, avoiding gratuitous duplicates. case " $HYPOTL_LIBM " in *" $LDEXPL_LIBM "*) ;; *) HYPOTL_LIBM="$HYPOTL_LIBM $LDEXPL_LIBM" ;; esac dnl Append $SQRTL_LIBM to HYPOTL_LIBM, avoiding gratuitous duplicates. case " $HYPOTL_LIBM " in *" $SQRTL_LIBM "*) ;; *) HYPOTL_LIBM="$HYPOTL_LIBM $SQRTL_LIBM" ;; esac fi fi AC_SUBST([HYPOTL_LIBM]) ]) dnl Test whether hypotl() works. dnl On OpenBSD 5.1/SPARC, dnl hypotl (2.5541394760659556563446062497337725156L, 7.7893454113437840832487794525518765265L) dnl has rounding errors that eat up the last 8 to 9 decimal digits. AC_DEFUN([gl_FUNC_HYPOTL_WORKS], [ AC_REQUIRE([AC_PROG_CC]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles AC_CACHE_CHECK([whether hypotl works], [gl_cv_func_hypotl_works], [ AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include <float.h> #include <math.h> static long double my_ldexpl (long double x, int d) { for (; d > 0; d--) x *= 2.0L; for (; d < 0; d++) x *= 0.5L; return x; } volatile long double x; volatile long double y; volatile long double z; int main () { long double err; x = 2.5541394760659556563446062497337725156L; y = 7.7893454113437840832487794525518765265L; z = hypotl (x, y); err = z * z - (x * x + y * y); err = my_ldexpl (err, LDBL_MANT_DIG); if (err < 0) err = - err; if (err > 1000.0L) return 1; return 0; } ]])], [gl_cv_func_hypotl_works=yes], [gl_cv_func_hypotl_works=no], [case "$host_os" in openbsd*) gl_cv_func_hypotl_works="guessing no" ;; # Guess yes on native Windows. mingw*) gl_cv_func_hypotl_works="guessing yes" ;; *) gl_cv_func_hypotl_works="guessing yes" ;; esac ]) ]) ])