X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-roundf1.c;h=62c580ea555dad98855ea8219e9722f55dc60c2d;hb=97bf2776a9598318b077991bf3914bcdf5a9fe28;hp=67d5c7fe90c85facb8a53a05f29943e9d165fc92;hpb=386f7ca44a81b4230f867b19f8cc8296869548d9;p=gnulib.git diff --git a/tests/test-roundf1.c b/tests/test-roundf1.c index 67d5c7fe9..62c580ea5 100644 --- a/tests/test-roundf1.c +++ b/tests/test-roundf1.c @@ -1,9 +1,9 @@ /* Test of rounding to nearest, breaking ties away from zero. - Copyright (C) 2007 Free Software Foundation, Inc. + Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2, or (at your option) + the Free Software Foundation; either version 3, or (at your option) any later version. This program is distributed in the hope that it will be useful, @@ -22,40 +22,23 @@ #include -#include -#include +#include "signature.h" +SIGNATURE_CHECK (roundf, float, (float)); -#include "isnanf.h" +#include "isnanf-nolibm.h" +#include "nan.h" +#include "macros.h" -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - abort (); \ - } \ - } \ - while (0) - -/* The Compaq (ex-DEC) C 6.4 compiler chokes on the expression 0.0 / 0.0. */ -#ifdef __DECC -static float -NaN () -{ - static float zero = 0.0f; - return zero / zero; -} -#else -# define NaN() (0.0f / 0.0f) -#endif +/* HP cc on HP-UX 10.20 has a bug with the constant expression -0.0f. + So we use -zero instead. */ +float zero = 0.0f; int main () { /* Zero. */ ASSERT (roundf (0.0f) == 0.0f); - ASSERT (roundf (-0.0f) == 0.0f); + ASSERT (roundf (-zero) == 0.0f); /* Positive numbers. */ ASSERT (roundf (0.3f) == 0.0f); ASSERT (roundf (0.5f) == 1.0f); @@ -86,7 +69,7 @@ main () ASSERT (roundf (1.0 / 0.0f) == 1.0 / 0.0f); ASSERT (roundf (-1.0 / 0.0f) == -1.0 / 0.0f); /* NaNs. */ - ASSERT (isnanf (roundf (NaN ()))); + ASSERT (isnanf (roundf (NaNf ()))); return 0; }