X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftest-roundf1.c;h=62c580ea555dad98855ea8219e9722f55dc60c2d;hb=94e727094e8d312df85d93a3f9f98cb43a5abb1d;hp=aeee3b1739f844b84ea7d022200f2e61a6dca806;hpb=06945b7c073c0872ec2049c0e0b94f789bf8d77e;p=gnulib.git diff --git a/tests/test-roundf1.c b/tests/test-roundf1.c index aeee3b173..62c580ea5 100644 --- a/tests/test-roundf1.c +++ b/tests/test-roundf1.c @@ -1,5 +1,5 @@ /* Test of rounding to nearest, breaking ties away from zero. - Copyright (C) 2007, 2008 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 @@ -22,28 +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) +/* 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); @@ -74,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; }