Hash :
86a9695e
Author :
Date :
2023-02-17T16:24:34
Improve cross-compilation from midipix. Reported by Ørjan Malde <red@foxi.me> at <https://lists.gnu.org/archive/html/bug-gnulib/2023-02/msg00131.html>. Since midipix consists of musl libc based on an emulation of Linux system calls, for pure libc functionality it can be treated like musl libc. * m4/calloc.m4 (_AC_FUNC_CALLOC_IF): Treat midipix like systems with musl libc. * m4/cbrtl.m4 (gl_FUNC_CBRTL): Likewise. * m4/ceil.m4 (gl_FUNC_CEIL): Likewise. * m4/ceilf.m4 (gl_FUNC_CEILF): Likewise. * m4/ceill.m4 (gl_FUNC_CEILL): Likewise. * m4/exp2l.m4 (gl_FUNC_EXP2L): Likewise. * m4/expl.m4 (gl_FUNC_EXPL): Likewise. * m4/expm1.m4 (gl_FUNC_EXPM1): Likewise. * m4/expm1f.m4 (gl_FUNC_EXPM1F): Likewise. * m4/expm1l.m4 (gl_FUNC_EXPM1L): Likewise. * m4/fclose.m4 (gl_FUNC_FCLOSE_STDIN): Likewise. * m4/fdopendir.m4 (gl_FUNC_FDOPENDIR): Likewise. * m4/ffsll.m4 (gl_FUNC_FFSLL): Likewise. * m4/floor.m4 (gl_FUNC_FLOOR): Likewise. * m4/floorf.m4 (gl_FUNC_FLOORF): Likewise. * m4/fmod.m4 (gl_FUNC_FMOD): Likewise. * m4/fmodf.m4 (gl_FUNC_FMODF): Likewise. * m4/fmodl.m4 (gl_FUNC_FMODL): Likewise. * m4/fnmatch.m4 (gl_FUNC_FNMATCH_POSIX): Likewise. * m4/fopen.m4 (gl_FUNC_FOPEN_GNU): Likewise. * m4/fpurge.m4 (gl_FUNC_FPURGE): Likewise. * m4/getdelim.m4 (gl_FUNC_GETDELIM): Likewise. * m4/getline.m4 (gl_FUNC_GETLINE): Likewise. * m4/hypot.m4 (gl_FUNC_HYPOT): Likewise. * m4/hypotf.m4 (gl_FUNC_HYPOTF): Likewise. * m4/hypotl.m4 (gl_FUNC_HYPOTL): Likewise. * m4/iconv_open-utf.m4 (gl_FUNC_ICONV_OPEN_UTF_SUPPORT): Likewise. * m4/log.m4 (gl_FUNC_LOG): Likewise. * m4/log10.m4 (gl_FUNC_LOG10): Likewise. * m4/log10f.m4 (gl_FUNC_LOG10F): Likewise. * m4/log10l.m4 (gl_FUNC_LOG10L_WORKS): Likewise. * m4/log1p.m4 (gl_FUNC_LOG1P): Likewise. * m4/log1pf.m4 (gl_FUNC_LOG1PF): Likewise. * m4/log1pl.m4 (gl_FUNC_LOG1PL, gl_FUNC_LOG1PL_WORKS): Likewise. * m4/log2.m4 (gl_FUNC_LOG2): Likewise. * m4/log2f.m4 (gl_FUNC_LOG2F): Likewise. * m4/log2l.m4 (gl_FUNC_LOG2L_WORKS): Likewise. * m4/logf.m4 (gl_FUNC_LOGF): Likewise. * m4/logl.m4 (gl_FUNC_LOGL_WORKS): Likewise. * m4/malloc.m4 (_AC_FUNC_MALLOC_IF): Likewise. * m4/mkstemp.m4 (gl_FUNC_MKSTEMP): Likewise. * m4/modf.m4 (gl_FUNC_MODF): Likewise. * m4/modff.m4 (gl_FUNC_MODFF): Likewise. * m4/modfl.m4 (gl_FUNC_MODFL): Likewise. * m4/musl.m4 (gl_MUSL_LIBC): Likewise. * m4/perror.m4 (gl_FUNC_PERROR): Likewise. * m4/posix_spawn.m4 (gl_POSIX_SPAWN_SECURE, gl_FUNC_POSIX_SPAWN_FILE_ACTIONS_ADDCLOSE, gl_FUNC_POSIX_SPAWN_FILE_ACTIONS_ADDDUP2, gl_FUNC_POSIX_SPAWN_FILE_ACTIONS_ADDOPEN): Likewise. * m4/printf.m4 (gl_PRINTF_SIZES_C99, gl_PRINTF_INFINITE, gl_PRINTF_INFINITE_LONG_DOUBLE, gl_PRINTF_DIRECTIVE_A, gl_PRINTF_DIRECTIVE_F, gl_PRINTF_FLAG_ZERO, gl_SNPRINTF_TRUNCATION_C99, gl_SNPRINTF_RETVAL_C99, gl_SNPRINTF_DIRECTIVE_N, gl_VSNPRINTF_ZEROSIZE_C99): Likewise. * m4/pthread_rwlock_rdlock.m4 (gl_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER): Likewise. * m4/putenv.m4 (gl_FUNC_PUTENV): Likewise. * m4/realloc.m4 (_AC_FUNC_REALLOC_IF): Likewise. * m4/remainder.m4 (gl_FUNC_REMAINDER): Likewise. * m4/remainderf.m4 (gl_FUNC_REMAINDERF): Likewise. * m4/remainderl.m4 (gl_FUNC_REMAINDERL, gl_FUNC_REMAINDERL_WORKS): Likewise. * m4/rintl.m4 (gl_FUNC_RINTL): Likewise. * m4/round.m4 (gl_FUNC_ROUND): Likewise. * m4/roundf.m4 (gl_FUNC_ROUNDF): Likewise. * m4/roundl.m4 (gl_FUNC_ROUNDL): Likewise. * m4/setenv.m4 (gl_FUNC_SETENV): Likewise. * m4/setlocale_null.m4 (gl_FUNC_SETLOCALE_NULL): Likewise. * m4/signbit.m4 (gl_SIGNBIT): Likewise. * m4/stpncpy.m4 (gl_FUNC_STPNCPY): Likewise. * m4/strerror.m4 (gl_FUNC_STRERROR, gl_FUNC_STRERROR_0): Likewise. * m4/strtod.m4 (gl_FUNC_STRTOD): Likewise. * m4/strtold.m4 (gl_FUNC_STRTOLD): Likewise. * m4/trunc.m4 (gl_FUNC_TRUNC): Likewise. * m4/truncf.m4 (gl_FUNC_TRUNCF): Likewise. * m4/truncl.m4 (gl_FUNC_TRUNCL): Likewise. * m4/ungetc.m4 (gl_FUNC_UNGETC_WORKS): Likewise. * m4/wcwidth.m4 (gl_FUNC_WCWIDTH): Likewise.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255
# remainderl.m4 serial 14
dnl Copyright (C) 2012-2023 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_REMAINDERL],
[
m4_divert_text([DEFAULTS], [gl_remainderl_required=plain])
AC_REQUIRE([gl_MATH_H_DEFAULTS])
AC_REQUIRE([gl_LONG_DOUBLE_VS_DOUBLE])
AC_REQUIRE([gl_FUNC_REMAINDER])
dnl Persuade glibc <math.h> to declare remainderl().
AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
dnl Test whether remainderl() exists. Assume that remainderl(), if it exists, is
dnl defined in the same library as remainder().
save_LIBS="$LIBS"
LIBS="$LIBS $REMAINDER_LIBM"
AC_CACHE_CHECK([for remainderl],
[gl_cv_func_remainderl],
[
AC_LINK_IFELSE(
[AC_LANG_PROGRAM(
[[#ifndef __NO_MATH_INLINES
# define __NO_MATH_INLINES 1 /* for glibc */
#endif
#include <math.h>
extern
#ifdef __cplusplus
"C"
#endif
long double remainderl (long double, long double);
long double (*funcptr) (long double, long double) = remainderl;
long double x;
long double y;]],
[[return funcptr (x, y) > 1
|| remainderl (x, y) > 1;]])],
[gl_cv_func_remainderl=yes],
[gl_cv_func_remainderl=no])
])
LIBS="$save_LIBS"
if test $gl_cv_func_remainderl = yes; then
HAVE_REMAINDERL=1
REMAINDERL_LIBM="$REMAINDER_LIBM"
dnl Also check whether it's declared.
dnl IRIX 6.5 has remainderl() in libm but doesn't declare it in <math.h>.
AC_CHECK_DECLS([remainderl], , [HAVE_DECL_REMAINDERL=0], [[#include <math.h>]])
save_LIBS="$LIBS"
LIBS="$LIBS $REMAINDERL_LIBM"
gl_FUNC_REMAINDERL_WORKS
LIBS="$save_LIBS"
case "$gl_cv_func_remainderl_works" in
*yes) ;;
*) REPLACE_REMAINDERL=1 ;;
esac
m4_ifdef([gl_FUNC_REMAINDERL_IEEE], [
if test $gl_remainderl_required = ieee && test $REPLACE_REMAINDERL = 0; then
AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
AC_CACHE_CHECK([whether remainderl works according to ISO C 99 with IEC 60559],
[gl_cv_func_remainderl_ieee],
[
save_LIBS="$LIBS"
LIBS="$LIBS $REMAINDERL_LIBM"
AC_RUN_IFELSE(
[AC_LANG_SOURCE([[
#ifndef __NO_MATH_INLINES
# define __NO_MATH_INLINES 1 /* for glibc */
#endif
#include <math.h>
extern
#ifdef __cplusplus
"C"
#endif
long double remainderl (long double, long double);
/* 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; }
int main (int argc, char *argv[])
{
long double (* volatile my_remainderl) (long double, long double) = argc ? remainderl : dummy;
long double f;
/* Test remainderl(...,0.0L).
This test fails on OSF/1 5.1. */
f = my_remainderl (2.0L, 0.0L);
if (numeric_equal (f, f))
return 1;
return 0;
}
]])],
[gl_cv_func_remainderl_ieee=yes],
[gl_cv_func_remainderl_ieee=no],
[case "$host_os" in
# Guess yes on glibc systems.
*-gnu* | gnu*) gl_cv_func_remainderl_ieee="guessing yes" ;;
# Guess yes on musl systems.
*-musl* | midipix*) gl_cv_func_remainderl_ieee="guessing yes" ;;
# Guess yes on native Windows.
mingw*) gl_cv_func_remainderl_ieee="guessing yes" ;;
# If we don't know, obey --enable-cross-guesses.
*) gl_cv_func_remainderl_ieee="$gl_cross_guess_normal" ;;
esac
])
LIBS="$save_LIBS"
])
case "$gl_cv_func_remainderl_ieee" in
*yes) ;;
*) REPLACE_REMAINDERL=1 ;;
esac
fi
])
else
HAVE_REMAINDERL=0
HAVE_DECL_REMAINDERL=0
fi
if test $HAVE_REMAINDERL = 0 || test $REPLACE_REMAINDERL = 1; then
dnl Find libraries needed to link lib/remainderl.c.
if test $HAVE_SAME_LONG_DOUBLE_AS_DOUBLE = 1; then
REMAINDERL_LIBM="$REMAINDER_LIBM"
else
AC_REQUIRE([gl_FUNC_FABSL])
AC_REQUIRE([gl_FUNC_FMODL])
AC_REQUIRE([gl_FUNC_ISNANL])
REMAINDERL_LIBM=
dnl Append $FABSL_LIBM to REMAINDERL_LIBM, avoiding gratuitous duplicates.
case " $REMAINDERL_LIBM " in
*" $FABSL_LIBM "*) ;;
*) REMAINDERL_LIBM="$REMAINDERL_LIBM $FABSL_LIBM" ;;
esac
dnl Append $FMODL_LIBM to REMAINDERL_LIBM, avoiding gratuitous duplicates.
case " $REMAINDERL_LIBM " in
*" $FMODL_LIBM "*) ;;
*) REMAINDERL_LIBM="$REMAINDERL_LIBM $FMODL_LIBM" ;;
esac
dnl Append $ISNANL_LIBM to REMAINDERL_LIBM, avoiding gratuitous duplicates.
case " $REMAINDERL_LIBM " in
*" $ISNANL_LIBM "*) ;;
*) REMAINDERL_LIBM="$REMAINDERL_LIBM $ISNANL_LIBM" ;;
esac
fi
fi
AC_SUBST([REMAINDERL_LIBM])
])
dnl Test whether remainderl() works.
dnl It produces completely wrong values on OpenBSD 5.1/SPARC.
dnl On musl 1.2.2/{arm64,s390x}, the result is accurate to only 16 digits.
AC_DEFUN([gl_FUNC_REMAINDERL_WORKS],
[
AC_REQUIRE([AC_PROG_CC])
AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
AC_CACHE_CHECK([whether remainderl works], [gl_cv_func_remainderl_works],
[
AC_RUN_IFELSE(
[AC_LANG_SOURCE([[
#ifndef __NO_MATH_INLINES
# define __NO_MATH_INLINES 1 /* for glibc */
#endif
#include <float.h>
#include <math.h>
/* Override the values of <float.h>, like done in float.in.h. */
#if defined __i386__ && (defined __BEOS__ || defined __OpenBSD__)
# undef LDBL_MANT_DIG
# define LDBL_MANT_DIG 64
# undef LDBL_MIN_EXP
# define LDBL_MIN_EXP (-16381)
# undef LDBL_MAX_EXP
# define LDBL_MAX_EXP 16384
#endif
#if defined __i386__ && (defined __FreeBSD__ || defined __DragonFly__)
# undef LDBL_MANT_DIG
# define LDBL_MANT_DIG 64
# undef LDBL_MIN_EXP
# define LDBL_MIN_EXP (-16381)
# undef LDBL_MAX_EXP
# define LDBL_MAX_EXP 16384
#endif
#if (defined _ARCH_PPC || defined _POWER) && defined _AIX && (LDBL_MANT_DIG == 106) && defined __GNUC__
# undef LDBL_MIN_EXP
# define LDBL_MIN_EXP DBL_MIN_EXP
#endif
#if defined __sgi && (LDBL_MANT_DIG >= 106)
# undef LDBL_MANT_DIG
# define LDBL_MANT_DIG 106
# if defined __GNUC__
# undef LDBL_MIN_EXP
# define LDBL_MIN_EXP DBL_MIN_EXP
# endif
#endif
extern
#ifdef __cplusplus
"C"
#endif
long double remainderl (long double, long double);
static long double dummy (long double x, long double y) { return 0; }
volatile long double gx;
volatile long double gy;
long double gz;
int main (int argc, char *argv[])
{
long double (* volatile my_remainderl) (long double, long double) =
argc ? remainderl : dummy;
int result = 0;
/* This test fails on OpenBSD 5.1/SPARC. */
{
gx = 9.245907126L;
gy = 3.141592654L;
gz = remainderl (gx, gy);
if (gz >= 0.0L)
result |= 1;
}
/* This test fails on musl 1.2.2/arm64, musl 1.2.2/s390x. */
{
const long double TWO_LDBL_MANT_DIG = /* 2^LDBL_MANT_DIG */
(long double) (1U << ((LDBL_MANT_DIG - 1) / 5))
* (long double) (1U << ((LDBL_MANT_DIG - 1 + 1) / 5))
* (long double) (1U << ((LDBL_MANT_DIG - 1 + 2) / 5))
* (long double) (1U << ((LDBL_MANT_DIG - 1 + 3) / 5))
* (long double) (1U << ((LDBL_MANT_DIG - 1 + 4) / 5));
long double x = 11.357996098166760874793827872740874983168L;
long double y = 0.486497838502717923110029188864352615388L;
long double z = my_remainderl (x, y) - (x - 23 * y);
long double err = z * TWO_LDBL_MANT_DIG;
if (!(err >= -32.0L && err <= 32.0L))
result |= 2;
}
return result;
}
]])],
[gl_cv_func_remainderl_works=yes],
[gl_cv_func_remainderl_works=no],
[case "$host_os" in
# Guess yes on glibc systems.
*-gnu* | gnu*) gl_cv_func_remainderl_works="guessing yes" ;;
# Guess no on musl systems.
*-musl* | midipix*) gl_cv_func_remainderl_works="guessing no" ;;
# Guess no on OpenBSD.
openbsd*) gl_cv_func_remainderl_works="guessing no" ;;
# Guess yes on native Windows.
mingw*) gl_cv_func_remainderl_works="guessing yes" ;;
# If we don't know, obey --enable-cross-guesses.
*) gl_cv_func_remainderl_works="$gl_cross_guess_normal" ;;
esac
])
])
])