X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftest-isinf.c;h=266cd7e9a059f9fbe57c9d102eb2112ad9ac8e6e;hb=eea38e67b2eb57529b01092d86178935d7ead222;hp=dffd99088b00ac94c96f24cba6ed469c9a5a820a;hpb=441aa3044f43e5572f58c354f01e6bc070acd5c7;p=gnulib.git diff --git a/tests/test-isinf.c b/tests/test-isinf.c index dffd99088..266cd7e9a 100644 --- a/tests/test-isinf.c +++ b/tests/test-isinf.c @@ -1,5 +1,5 @@ /* Test of isinf() substitute. - Copyright (C) 2007-2008 Free Software Foundation, Inc. + Copyright (C) 2007-2011 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 @@ -19,24 +19,18 @@ #include +#include + +/* isinf must be a macro. */ +#ifndef isinf +# error missing declaration +#endif + #include #include -#include -#include -#include - -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - fflush (stderr); \ - abort (); \ - } \ - } \ - while (0) +#include "infinity.h" +#include "macros.h" float zerof = 0.0f; double zerod = 0.0; @@ -60,8 +54,8 @@ test_isinff () ASSERT (!isinf (FLT_MAX)); ASSERT (!isinf (-FLT_MAX)); /* Infinite values. */ - ASSERT (isinf (1.0f / 0.0f)); - ASSERT (isinf (-1.0f / 0.0f)); + ASSERT (isinf (Infinityf ())); + ASSERT (isinf (- Infinityf ())); /* Quiet NaN. */ ASSERT (!isinf (zerof / zerof)); #if defined FLT_EXPBIT0_WORD && defined FLT_EXPBIT0_BIT @@ -106,8 +100,8 @@ test_isinfd () ASSERT (!isinf (DBL_MAX)); ASSERT (!isinf (-DBL_MAX)); /* Infinite values. */ - ASSERT (isinf (1.0 / 0.0)); - ASSERT (isinf (-1.0 / 0.0)); + ASSERT (isinf (Infinityd ())); + ASSERT (isinf (- Infinityd ())); /* Quiet NaN. */ ASSERT (!isinf (zerod / zerod)); #if defined DBL_EXPBIT0_WORD && defined DBL_EXPBIT0_BIT @@ -155,8 +149,8 @@ test_isinfl () ASSERT (!isinf (LDBL_MAX)); ASSERT (!isinf (-LDBL_MAX)); /* Infinite values. */ - ASSERT (isinf (1.0L / 0.0L)); - ASSERT (isinf (-1.0L / 0.0L)); + ASSERT (isinf (Infinityl ())); + ASSERT (isinf (- Infinityl ())); /* Quiet NaN. */ ASSERT (!isinf (zerol / zerol));