X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-truncf1.c;h=8b125a8b86a9e036f29907f22473621725319f23;hb=e2843e30e8c2885eb8cbc77e20c4e0f4d562d44d;hp=0fefc7fa2a6a603bd36bd40309b95881de802853;hpb=0a8c99541d9bc68404b24a4ba963b3483f83e157;p=gnulib.git diff --git a/tests/test-truncf1.c b/tests/test-truncf1.c index 0fefc7fa2..8b125a8b8 100644 --- a/tests/test-truncf1.c +++ b/tests/test-truncf1.c @@ -1,5 +1,5 @@ /* Test of rounding towards zero. - Copyright (C) 2007 Free Software Foundation, Inc. + Copyright (C) 2007-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 @@ -20,38 +20,23 @@ #include -#include -#include +#include "signature.h" +SIGNATURE_CHECK (truncf, float, (float)); -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - abort (); \ - } \ - } \ - while (0) +#include "isnanf-nolibm.h" +#include "nan.h" +#include "macros.h" -/* 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 (truncf (0.0f) == 0.0f); - ASSERT (truncf (-0.0f) == 0.0f); + ASSERT (truncf (-zero) == 0.0f); /* Positive numbers. */ ASSERT (truncf (0.3f) == 0.0f); ASSERT (truncf (0.7f) == 0.0f); @@ -76,7 +61,7 @@ main () ASSERT (truncf (1.0f / 0.0f) == 1.0f / 0.0f); ASSERT (truncf (-1.0f / 0.0f) == -1.0f / 0.0f); /* NaNs. */ - ASSERT (isnan (truncf (NaN ()))); + ASSERT (isnanf (truncf (NaNf ()))); return 0; }