X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=inline;f=tests%2Ftest-roundl.c;h=fca60f052bf8163c2b1393945079df04750582b3;hb=13037c0c078f582710eb034c0613a9f74980d466;hp=51cd1cdd9e30cebbcb54381f1b6ee0f42b64fd0c;hpb=b7cb23a66cd14b33c65e4fc95cbc5e6a4ed51fee;p=gnulib.git diff --git a/tests/test-roundl.c b/tests/test-roundl.c index 51cd1cdd9..fca60f052 100644 --- a/tests/test-roundl.c +++ b/tests/test-roundl.c @@ -1,5 +1,5 @@ /* Test of rounding to nearest, breaking ties away from zero. - Copyright (C) 2007-2009 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 @@ -22,24 +22,15 @@ #include +#include "signature.h" +SIGNATURE_CHECK (roundl, long double, (long double)); + #include -#include -#include #include "fpucw.h" #include "isnanl-nolibm.h" - -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - fflush (stderr); \ - abort (); \ - } \ - } \ - while (0) +#include "nan.h" +#include "macros.h" /* On HP-UX 10.20, negating 0.0L does not yield -0.0L. So we use minus_zero instead. @@ -97,7 +88,7 @@ main () ASSERT (roundl (1.0 / 0.0L) == 1.0 / 0.0L); ASSERT (roundl (-1.0 / 0.0L) == -1.0 / 0.0L); /* NaNs. */ - ASSERT (isnanl (roundl (0.0L / 0.0L))); + ASSERT (isnanl (roundl (NaNl ()))); return 0; }