X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-frexpl.c;h=93cfa14434f37ae2c0b386ec908c13e896d57ebb;hb=70f2c04b76c463b54adb0c1db6de2b2c5c40661c;hp=fd2c7e07926cd52982108cd5523915b13bb82678;hpb=5d7e7dd737c62fe09ce0d083810a502209dc5e80;p=gnulib.git diff --git a/tests/test-frexpl.c b/tests/test-frexpl.c index fd2c7e079..93cfa1443 100644 --- a/tests/test-frexpl.c +++ b/tests/test-frexpl.c @@ -22,12 +22,22 @@ #include #include +#include #include #include "fpucw.h" #include "isnanl-nolibm.h" -#define ASSERT(expr) if (!(expr)) abort (); +#define ASSERT(expr) \ + do \ + { \ + if (!(expr)) \ + { \ + fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ + abort (); \ + } \ + } \ + while (0) /* On MIPS IRIX machines, LDBL_MIN_EXP is -1021, but the smallest reliable exponent for 'long double' is -964. For exponents below that, the