X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=inline;f=tests%2Ftest-round1.c;h=e48a618a7c14008df4012e9b7955b58a1cc07c9f;hb=d42a16b0fce4238daad80779ffa169b56696ff96;hp=704e1da640f30979834cadcf56ed248c56305a3e;hpb=06945b7c073c0872ec2049c0e0b94f789bf8d77e;p=gnulib.git diff --git a/tests/test-round1.c b/tests/test-round1.c index 704e1da64..e48a618a7 100644 --- a/tests/test-round1.c +++ b/tests/test-round1.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-2012 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 @@ -12,8 +12,7 @@ GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software Foundation, - Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ + along with this program; if not, see . */ /* Written by Ben Pfaff , 2007. Based heavily on Bruno Haible's test-trunc.c. */ @@ -22,28 +21,21 @@ #include -#include -#include +#include "signature.h" +SIGNATURE_CHECK (round, double, (double)); -#include "isnand.h" - -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - abort (); \ - } \ - } \ - while (0) +#include "isnand-nolibm.h" +#include "minus-zero.h" +#include "infinity.h" +#include "nan.h" +#include "macros.h" int main () { /* Zero. */ ASSERT (round (0.0) == 0.0); - ASSERT (round (-0.0) == 0.0); + ASSERT (round (minus_zerod) == 0.0); /* Positive numbers. */ ASSERT (round (0.3) == 0.0); ASSERT (round (0.5) == 1.0); @@ -71,10 +63,10 @@ main () ASSERT (round (-65536.001) == -65536.0); ASSERT (round (-2.341e31) == -2.341e31); /* Infinite numbers. */ - ASSERT (round (1.0 / 0.0) == 1.0 / 0.0); - ASSERT (round (-1.0 / 0.0) == -1.0 / 0.0); + ASSERT (round (Infinityd ()) == Infinityd ()); + ASSERT (round (- Infinityd ()) == - Infinityd ()); /* NaNs. */ - ASSERT (isnand (round (NAN))); + ASSERT (isnand (round (NaNd ()))); return 0; }