# HG changeset patch # User Bruno Haible # Date 1208114417 -7200 # Node ID 682e19d65658b7de45846db84c60aca64c72fb87 # Parent d3f5a70dc1baa7aac1e82593c385b46ed491a5d2 Avoid negating 0.0L - it yields a wrong result on HP-UX/hppa. diff --git a/ChangeLog b/ChangeLog --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2008-04-13 Bruno Haible + + Make test-signbit pass on HP-UX/hppa. + * tests/test-signbit.c (minus_zerol): New variable. + (test_signbitl): Use it. + 2008-04-13 Bruno Haible Make truncl work on OSF/1 4.0. diff --git a/tests/test-signbit.c b/tests/test-signbit.c --- a/tests/test-signbit.c +++ b/tests/test-signbit.c @@ -39,6 +39,9 @@ float zerof = 0.0f; double zerod = 0.0; long double zerol = 0.0L; +/* We cannot use the expression '-zerol' here, because on HP-UX/hppa it + evaluates to 0.0L, not -0.0L. */ +long double minus_zerol = -0.0L; static void test_signbitf () @@ -140,7 +143,7 @@ ASSERT (signbit (-2.718e-30L)); /* Zeros. */ ASSERT (!signbit (0.0L)); - if (1.0L / -zerol < 0) + if (1.0L / minus_zerol < 0) ASSERT (signbit (-0.0L)); else ASSERT (!signbit (-0.0L));