/* Tests for _FloatN / _FloatNx types: compile and execution tests for NaNs. Before including this file, define WIDTH as the value N; define EXT to 1 for _FloatNx and 0 for _FloatN. */ #define CONCATX(X, Y) X ## Y #define CONCAT(X, Y) CONCATX (X, Y) #define CONCAT3(X, Y, Z) CONCAT (CONCAT (X, Y), Z) #define CONCAT4(W, X, Y, Z) CONCAT (CONCAT (CONCAT (W, X), Y), Z) #if EXT # define TYPE CONCAT3 (_Float, WIDTH, x) # define CST(C) CONCAT4 (C, f, WIDTH, x) # define FN(F) CONCAT4 (F, f, WIDTH, x) #else # define TYPE CONCAT (_Float, WIDTH) # define CST(C) CONCAT3 (C, f, WIDTH) # define FN(F) CONCAT3 (F, f, WIDTH) #endif #include <fenv.h> extern void exit (int); extern void abort (void); volatile TYPE nan_cst = FN (__builtin_nan) (""); volatile TYPE nans_cst = FN (__builtin_nans) (""); int main (void) { volatile TYPE r; r = nan_cst + nan_cst; if (fetestexcept (FE_INVALID)) abort (); r = nans_cst + nans_cst; if (!fetestexcept (FE_INVALID)) abort (); exit (0); }