Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/gcc.dg/torture/floatn-tg-2.h @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* Tests for _FloatN / _FloatNx types: compile and execution tests for
kono
parents:
diff changeset
2 type-generic built-in functions: __builtin_isinf_sign. Before
kono
parents:
diff changeset
3 including this file, define WIDTH as the value N; define EXT to 1
kono
parents:
diff changeset
4 for _FloatNx and 0 for _FloatN. */
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 #define __STDC_WANT_IEC_60559_TYPES_EXT__
kono
parents:
diff changeset
7 #include <float.h>
kono
parents:
diff changeset
8
kono
parents:
diff changeset
9 #define CONCATX(X, Y) X ## Y
kono
parents:
diff changeset
10 #define CONCAT(X, Y) CONCATX (X, Y)
kono
parents:
diff changeset
11 #define CONCAT3(X, Y, Z) CONCAT (CONCAT (X, Y), Z)
kono
parents:
diff changeset
12 #define CONCAT4(W, X, Y, Z) CONCAT (CONCAT (CONCAT (W, X), Y), Z)
kono
parents:
diff changeset
13
kono
parents:
diff changeset
14 #if EXT
kono
parents:
diff changeset
15 # define TYPE CONCAT3 (_Float, WIDTH, x)
kono
parents:
diff changeset
16 # define CST(C) CONCAT4 (C, f, WIDTH, x)
kono
parents:
diff changeset
17 # define MAX CONCAT3 (FLT, WIDTH, X_MAX)
kono
parents:
diff changeset
18 #else
kono
parents:
diff changeset
19 # define TYPE CONCAT (_Float, WIDTH)
kono
parents:
diff changeset
20 # define CST(C) CONCAT3 (C, f, WIDTH)
kono
parents:
diff changeset
21 # define MAX CONCAT3 (FLT, WIDTH, _MAX)
kono
parents:
diff changeset
22 #endif
kono
parents:
diff changeset
23
kono
parents:
diff changeset
24 extern void exit (int);
kono
parents:
diff changeset
25 extern void abort (void);
kono
parents:
diff changeset
26
kono
parents:
diff changeset
27 volatile TYPE inf = __builtin_inf (), nanval = __builtin_nan ("");
kono
parents:
diff changeset
28 volatile TYPE neginf = -__builtin_inf (), negnanval = -__builtin_nan ("");
kono
parents:
diff changeset
29 volatile TYPE zero = CST (0.0), negzero = -CST (0.0), one = CST (1.0);
kono
parents:
diff changeset
30 volatile TYPE max = MAX, negmax = -MAX;
kono
parents:
diff changeset
31
kono
parents:
diff changeset
32 int
kono
parents:
diff changeset
33 main (void)
kono
parents:
diff changeset
34 {
kono
parents:
diff changeset
35 if (__builtin_isinf_sign (inf) != 1)
kono
parents:
diff changeset
36 abort ();
kono
parents:
diff changeset
37 if (__builtin_isinf_sign (neginf) != -1)
kono
parents:
diff changeset
38 abort ();
kono
parents:
diff changeset
39 if (__builtin_isinf_sign (nanval) != 0)
kono
parents:
diff changeset
40 abort ();
kono
parents:
diff changeset
41 if (__builtin_isinf_sign (negnanval) != 0)
kono
parents:
diff changeset
42 abort ();
kono
parents:
diff changeset
43 if (__builtin_isinf_sign (zero) != 0)
kono
parents:
diff changeset
44 abort ();
kono
parents:
diff changeset
45 if (__builtin_isinf_sign (negzero) != 0)
kono
parents:
diff changeset
46 abort ();
kono
parents:
diff changeset
47 if (__builtin_isinf_sign (one) != 0)
kono
parents:
diff changeset
48 abort ();
kono
parents:
diff changeset
49 if (__builtin_isinf_sign (max) != 0)
kono
parents:
diff changeset
50 abort ();
kono
parents:
diff changeset
51 if (__builtin_isinf_sign (negmax) != 0)
kono
parents:
diff changeset
52 abort ();
kono
parents:
diff changeset
53 exit (0);
kono
parents:
diff changeset
54 }