OSDN Git Service

2008-07-07 H.J. Lu <hongjiu.lu@intel.com>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / compat / struct-by-value-13_x.c
1 #include "compat-common.h"
2
3 #include "fp-struct-defs.h"
4 #include "fp-struct-check.h"
5 #include "fp-struct-test-by-value-x.h"
6
7 #ifndef SKIP_COMPLEX_INT
8 DEFS(ci, _Complex int)
9 CHECKS(ci, _Complex int)
10
11 TEST(Sci1, _Complex int)
12 TEST(Sci2, _Complex int)
13 TEST(Sci3, _Complex int)
14 TEST(Sci4, _Complex int)
15 TEST(Sci5, _Complex int)
16 TEST(Sci6, _Complex int)
17 TEST(Sci7, _Complex int)
18 TEST(Sci8, _Complex int)
19 TEST(Sci9, _Complex int)
20 TEST(Sci10, _Complex int)
21 TEST(Sci11, _Complex int)
22 TEST(Sci12, _Complex int)
23 TEST(Sci13, _Complex int)
24 TEST(Sci14, _Complex int)
25 TEST(Sci15, _Complex int)
26 TEST(Sci16, _Complex int)
27 #endif
28
29 #undef T
30
31 void
32 struct_by_value_13_x ()
33 {
34 #ifndef SKIP_COMPLEX_INT
35 DEBUG_INIT
36
37 #define T(TYPE, MTYPE) testit##TYPE ();
38
39 T(Sci1, _Complex int)
40 T(Sci2, _Complex int)
41 T(Sci3, _Complex int)
42 T(Sci4, _Complex int)
43 T(Sci5, _Complex int)
44 T(Sci6, _Complex int)
45 T(Sci7, _Complex int)
46 T(Sci8, _Complex int)
47 T(Sci9, _Complex int)
48 T(Sci10, _Complex int)
49 T(Sci11, _Complex int)
50 T(Sci12, _Complex int)
51 T(Sci13, _Complex int)
52 T(Sci14, _Complex int)
53 T(Sci15, _Complex int)
54 T(Sci16, _Complex int)
55
56 DEBUG_FINI
57
58 if (fails != 0)
59   abort ();
60
61 #undef T
62 #endif
63 }