# HG changeset patch # User Bruno Haible # Date 1308488739 -7200 # Node ID ad0991531a640ffad738e2956e62bd4c4dc4f2e6 # Parent b9224776823f8988ef36f61ebc680bb850fc1116 roundl-ieee: Fix test failure on AIX 7.1. * m4/roundl.m4 (gl_FUNC_ROUNDL): Test also the sign of roundl (-0.3L). * doc/posix-functions/roundl.texi: Mention problem with negative arguments. diff --git a/ChangeLog b/ChangeLog --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2011-06-19 Bruno Haible + + roundl-ieee: Fix test failure on AIX 7.1. + * m4/roundl.m4 (gl_FUNC_ROUNDL): Test also the sign of roundl (-0.3L). + * doc/posix-functions/roundl.texi: Mention problem with negative + arguments. + 2011-06-19 Bruno Haible round-ieee: Fix test failures on AIX 7.1 and OSF/1 5.1. diff --git a/doc/posix-functions/roundl.texi b/doc/posix-functions/roundl.texi --- a/doc/posix-functions/roundl.texi +++ b/doc/posix-functions/roundl.texi @@ -19,6 +19,10 @@ Portability problems fixed by Gnulib module @code{roundl-ieee}: @itemize @item +This function returns a positive zero for an argument between -0.5 and 0 +on some platforms: +AIX 7.1. +@item This function returns a positive zero for a minus zero argument on some platforms: OSF/1 5.1. diff --git a/m4/roundl.m4 b/m4/roundl.m4 --- a/m4/roundl.m4 +++ b/m4/roundl.m4 @@ -1,4 +1,4 @@ -# roundl.m4 serial 10 +# roundl.m4 serial 11 dnl Copyright (C) 2007, 2009-2011 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, @@ -35,10 +35,14 @@ int main (int argc, char *argv[]) { long double (*my_roundl) (long double) = argc ? roundl : dummy; + int result = 0; /* Test whether roundl (-0.0L) is -0.0L. */ if (signbitl (minus_zerol) && !signbitl (my_roundl (minus_zerol))) - return 1; - return 0; + result |= 1; + /* Test whether roundl (-0.3L) is -0.0L. */ + if (signbitl (-0.3L) && !signbitl (my_roundl (-0.3L))) + result |= 2; + return result; } ]])], [gl_cv_func_roundl_ieee=yes],