mirror of
https://git.savannah.gnu.org/git/gnulib.git
synced 2025-08-18 23:42:00 +03:00
remainderl: Bypass broken implementation in OpenBSD 5.1/SPARC.
* m4/remainderl.m4 (gl_FUNC_REMAINDERL_WORKS): New macro. (gl_FUNC_REMAINDERL): Invoke it. If the function does not work, set REPLACE_REMAINDERL to 1. * doc/posix-functions/remainderl.texi: Mention the OpenBSD 5.1/SPARC bug.
This commit is contained in:
@@ -1,3 +1,12 @@
|
|||||||
|
2012-03-13 Bruno Haible <bruno@clisp.org>
|
||||||
|
|
||||||
|
remainderl: Bypass broken implementation in OpenBSD 5.1/SPARC.
|
||||||
|
* m4/remainderl.m4 (gl_FUNC_REMAINDERL_WORKS): New macro.
|
||||||
|
(gl_FUNC_REMAINDERL): Invoke it. If the function does not work, set
|
||||||
|
REPLACE_REMAINDERL to 1.
|
||||||
|
* doc/posix-functions/remainderl.texi: Mention the OpenBSD 5.1/SPARC
|
||||||
|
bug.
|
||||||
|
|
||||||
2012-03-13 Bruno Haible <bruno@clisp.org>
|
2012-03-13 Bruno Haible <bruno@clisp.org>
|
||||||
|
|
||||||
sqrtl: Bypass broken implementation in OpenBSD 5.1/SPARC.
|
sqrtl: Bypass broken implementation in OpenBSD 5.1/SPARC.
|
||||||
|
@@ -14,6 +14,9 @@ FreeBSD 6.0, NetBSD 5.0, OpenBSD 3.8, Minix 3.1.8, AIX 5.1, HP-UX 11, older IRIX
|
|||||||
@item
|
@item
|
||||||
This function is not declared on some platforms:
|
This function is not declared on some platforms:
|
||||||
IRIX 6.5.
|
IRIX 6.5.
|
||||||
|
@item
|
||||||
|
This function returns completely wrong values on some platforms:
|
||||||
|
OpenBSD 5.1/SPARC.
|
||||||
@end itemize
|
@end itemize
|
||||||
|
|
||||||
Portability problems fixed by Gnulib module @code{remainderl-ieee}:
|
Portability problems fixed by Gnulib module @code{remainderl-ieee}:
|
||||||
|
@@ -1,4 +1,4 @@
|
|||||||
# remainderl.m4 serial 5
|
# remainderl.m4 serial 6
|
||||||
dnl Copyright (C) 2012 Free Software Foundation, Inc.
|
dnl Copyright (C) 2012 Free Software Foundation, Inc.
|
||||||
dnl This file is free software; the Free Software Foundation
|
dnl This file is free software; the Free Software Foundation
|
||||||
dnl gives unlimited permission to copy and/or distribute it,
|
dnl gives unlimited permission to copy and/or distribute it,
|
||||||
@@ -47,6 +47,16 @@ AC_DEFUN([gl_FUNC_REMAINDERL],
|
|||||||
dnl Also check whether it's declared.
|
dnl Also check whether it's declared.
|
||||||
dnl IRIX 6.5 has remainderl() in libm but doesn't declare it in <math.h>.
|
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>]])
|
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], [
|
m4_ifdef([gl_FUNC_REMAINDERL_IEEE], [
|
||||||
if test $gl_remainderl_required = ieee && test $REPLACE_REMAINDERL = 0; then
|
if test $gl_remainderl_required = ieee && test $REPLACE_REMAINDERL = 0; then
|
||||||
AC_CACHE_CHECK([whether remainderl works according to ISO C 99 with IEC 60559],
|
AC_CACHE_CHECK([whether remainderl works according to ISO C 99 with IEC 60559],
|
||||||
@@ -129,3 +139,46 @@ int main (int argc, char *argv[])
|
|||||||
fi
|
fi
|
||||||
AC_SUBST([REMAINDERL_LIBM])
|
AC_SUBST([REMAINDERL_LIBM])
|
||||||
])
|
])
|
||||||
|
|
||||||
|
dnl Test whether remainderl() works.
|
||||||
|
dnl It produces completely wrong values on OpenBSD 5.1/SPARC.
|
||||||
|
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 <math.h>
|
||||||
|
extern
|
||||||
|
#ifdef __cplusplus
|
||||||
|
"C"
|
||||||
|
#endif
|
||||||
|
long double remainderl (long double, long double);
|
||||||
|
volatile long double x;
|
||||||
|
volatile long double y;
|
||||||
|
long double z;
|
||||||
|
int main ()
|
||||||
|
{
|
||||||
|
/* This test fails on OpenBSD 5.1/SPARC. */
|
||||||
|
x = 9.245907126L;
|
||||||
|
y = 3.141592654L;
|
||||||
|
z = remainderl (x, y);
|
||||||
|
if (z >= 0.0L)
|
||||||
|
return 1;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
]])],
|
||||||
|
[gl_cv_func_remainderl_works=yes],
|
||||||
|
[gl_cv_func_remainderl_works=no],
|
||||||
|
[case "$host_os" in
|
||||||
|
openbsd*) gl_cv_func_remainderl_works="guessing no";;
|
||||||
|
*) gl_cv_func_remainderl_works="guessing yes";;
|
||||||
|
esac
|
||||||
|
])
|
||||||
|
])
|
||||||
|
])
|
||||||
|
Reference in New Issue
Block a user