Merge to HEAD at tree-cleanup-merge-20041024 .
[official-gcc.git] / gcc / testsuite / gcc.dg / compat / struct-by-value-8_x.c
blob5a376fd38cfcba58cd53b168d5cf85922bdaecdf
1 #include "compat-common.h"
3 #define T(N, TYPE) \
4 struct S##TYPE##N { TYPE i[N]; }; \
6 struct S##TYPE##N g1s##TYPE##N, g2s##TYPE##N; \
7 struct S##TYPE##N g3s##TYPE##N, g4s##TYPE##N; \
8 struct S##TYPE##N g5s##TYPE##N, g6s##TYPE##N; \
9 struct S##TYPE##N g7s##TYPE##N, g8s##TYPE##N; \
10 struct S##TYPE##N g9s##TYPE##N, g10s##TYPE##N; \
11 struct S##TYPE##N g11s##TYPE##N, g12s##TYPE##N; \
12 struct S##TYPE##N g13s##TYPE##N, g14s##TYPE##N; \
13 struct S##TYPE##N g15s##TYPE##N, g16s##TYPE##N; \
15 extern void init##TYPE (TYPE *p, int i); \
16 extern void checkg##TYPE##N (void); \
17 extern void \
18 test##TYPE##N (struct S##TYPE##N s1, struct S##TYPE##N s2, \
19 struct S##TYPE##N s3, struct S##TYPE##N s4, \
20 struct S##TYPE##N s5, struct S##TYPE##N s6, \
21 struct S##TYPE##N s7, struct S##TYPE##N s8, \
22 struct S##TYPE##N s9, struct S##TYPE##N s10, \
23 struct S##TYPE##N s11, struct S##TYPE##N s12, \
24 struct S##TYPE##N s13, struct S##TYPE##N s14, \
25 struct S##TYPE##N s15, struct S##TYPE##N s16); \
26 extern void testva##TYPE##N (int n, ...); \
29 void \
30 init##TYPE##N (struct S##TYPE##N *p, int i) \
31 { \
32 int j; \
33 for (j = 0; j < N; j++) \
34 init##TYPE(&p->i[j], i+j); \
35 } \
37 void \
38 check##TYPE##N (struct S##TYPE##N *p, int i) \
39 { \
40 int j; \
41 for (j = 0; j < N; j++) \
42 check##TYPE(p->i[j], i+j); \
43 } \
45 void \
46 test2_##TYPE##N (struct S##TYPE##N s1, struct S##TYPE##N s2, \
47 struct S##TYPE##N s3, struct S##TYPE##N s4, \
48 struct S##TYPE##N s5, struct S##TYPE##N s6, \
49 struct S##TYPE##N s7, struct S##TYPE##N s8) \
50 { \
51 test##TYPE##N (s1, g2s##TYPE##N, s2, g4s##TYPE##N, \
52 s3, g6s##TYPE##N, s4, g8s##TYPE##N, \
53 s5, g10s##TYPE##N, s6, g12s##TYPE##N, \
54 s7, g14s##TYPE##N, s8, g16s##TYPE##N); \
55 } \
57 void \
58 testit##TYPE##N (void) \
59 { \
60 DEBUG_FPUTS (#TYPE "[" #N "]"); \
61 DEBUG_FPUTS (" init: "); \
62 init##TYPE##N ( &g1s##TYPE##N, 1*16); \
63 init##TYPE##N ( &g2s##TYPE##N, 2*16); \
64 init##TYPE##N ( &g3s##TYPE##N, 3*16); \
65 init##TYPE##N ( &g4s##TYPE##N, 4*16); \
66 init##TYPE##N ( &g5s##TYPE##N, 5*16); \
67 init##TYPE##N ( &g6s##TYPE##N, 6*16); \
68 init##TYPE##N ( &g7s##TYPE##N, 7*16); \
69 init##TYPE##N ( &g8s##TYPE##N, 8*16); \
70 init##TYPE##N ( &g9s##TYPE##N, 9*16); \
71 init##TYPE##N (&g10s##TYPE##N, 10*16); \
72 init##TYPE##N (&g11s##TYPE##N, 11*16); \
73 init##TYPE##N (&g12s##TYPE##N, 12*16); \
74 init##TYPE##N (&g13s##TYPE##N, 13*16); \
75 init##TYPE##N (&g14s##TYPE##N, 14*16); \
76 init##TYPE##N (&g15s##TYPE##N, 15*16); \
77 init##TYPE##N (&g16s##TYPE##N, 16*16); \
78 checkg##TYPE##N (); \
79 DEBUG_NL; \
80 DEBUG_FPUTS (#TYPE "[" #N "]"); \
81 DEBUG_FPUTS (" test: "); \
82 test##TYPE##N (g1s##TYPE##N, g2s##TYPE##N, \
83 g3s##TYPE##N, g4s##TYPE##N, \
84 g5s##TYPE##N, g6s##TYPE##N, \
85 g7s##TYPE##N, g8s##TYPE##N, \
86 g9s##TYPE##N, g10s##TYPE##N, \
87 g11s##TYPE##N, g12s##TYPE##N, \
88 g13s##TYPE##N, g14s##TYPE##N, \
89 g15s##TYPE##N, g16s##TYPE##N); \
90 DEBUG_NL; \
91 DEBUG_FPUTS (#TYPE "[" #N "]"); \
92 DEBUG_FPUTS (" testva:"); \
93 testva##TYPE##N (16, \
94 g1s##TYPE##N, g2s##TYPE##N, \
95 g3s##TYPE##N, g4s##TYPE##N, \
96 g5s##TYPE##N, g6s##TYPE##N, \
97 g7s##TYPE##N, g8s##TYPE##N, \
98 g9s##TYPE##N, g10s##TYPE##N, \
99 g11s##TYPE##N, g12s##TYPE##N, \
100 g13s##TYPE##N, g14s##TYPE##N, \
101 g15s##TYPE##N, g16s##TYPE##N); \
102 DEBUG_NL; \
103 DEBUG_FPUTS (#TYPE "[" #N "]"); \
104 DEBUG_FPUTS (" test2: "); \
105 test2_##TYPE##N (g1s##TYPE##N, g3s##TYPE##N, \
106 g5s##TYPE##N, g7s##TYPE##N, \
107 g9s##TYPE##N, g11s##TYPE##N, \
108 g13s##TYPE##N, g15s##TYPE##N); \
109 DEBUG_NL; \
112 typedef struct { char c; } Sc;
113 typedef struct { short s; } Ss;
114 typedef struct { int i; } Si;
115 typedef struct { short s; char c; } Ssc;
116 typedef struct { int i; short s; } Sis;
117 typedef struct { char c; short s; int i; } Scsi;
118 typedef struct { char c; int i; short s; } Scis;
120 void checkSc (Sc x, int i) { if (x.c != i/16) DEBUG_CHECK }
121 void checkSs (Ss x, int i) { if (x.s != i) DEBUG_CHECK }
122 void checkSi (Si x, int i) { if (x.i != i) DEBUG_CHECK }
123 void checkSsc (Ssc x, int i)
124 { if (x.s != i || x.c != (i/16)+1) DEBUG_CHECK }
125 void checkSis (Sis x, int i)
126 { if (x.i != i || x.s != i+1) DEBUG_CHECK }
127 void checkScsi (Scsi x, int i)
128 { if (x.c != i/16 || x.s != i+1 || x.i != i+2) DEBUG_CHECK }
129 void checkScis (Scis x, int i)
130 { if (x.c != i/16 || x.i != i+1 || x.s != i+2) DEBUG_CHECK }
132 #ifndef SKIP_ZERO_ARRAY
133 T(0, Ssc)
134 #endif
135 T(1, Ssc)
136 T(2, Ssc)
137 T(3, Ssc)
138 T(4, Ssc)
139 T(5, Ssc)
140 T(6, Ssc)
141 T(7, Ssc)
142 T(8, Ssc)
143 T(9, Ssc)
144 T(10, Ssc)
145 T(11, Ssc)
146 T(12, Ssc)
147 T(13, Ssc)
148 T(14, Ssc)
149 T(15, Ssc)
150 #ifndef SKIP_ZERO_ARRAY
151 T(0, Sis)
152 #endif
153 T(1, Sis)
154 T(2, Sis)
155 T(3, Sis)
156 T(4, Sis)
157 T(5, Sis)
158 T(6, Sis)
159 T(7, Sis)
160 T(8, Sis)
161 T(9, Sis)
162 T(10, Sis)
163 T(11, Sis)
164 T(12, Sis)
165 T(13, Sis)
166 T(14, Sis)
167 T(15, Sis)
169 #undef T
171 void
172 struct_by_value_8_x ()
174 DEBUG_INIT
176 #define T(N, TYPE) testit##TYPE##N ();
178 #ifndef SKIP_ZERO_ARRAY
179 T(0, Ssc)
180 #endif
181 T(1, Ssc)
182 T(2, Ssc)
183 T(3, Ssc)
184 T(4, Ssc)
185 T(5, Ssc)
186 T(6, Ssc)
187 T(7, Ssc)
188 T(8, Ssc)
189 T(9, Ssc)
190 T(10, Ssc)
191 T(11, Ssc)
192 T(12, Ssc)
193 T(13, Ssc)
194 T(14, Ssc)
195 T(15, Ssc)
196 #ifndef SKIP_ZERO_ARRAY
197 T(0, Sis)
198 #endif
199 T(1, Sis)
200 T(2, Sis)
201 T(3, Sis)
202 T(4, Sis)
203 T(5, Sis)
204 T(6, Sis)
205 T(7, Sis)
206 T(8, Sis)
207 T(9, Sis)
208 T(10, Sis)
209 T(11, Sis)
210 T(12, Sis)
211 T(13, Sis)
212 T(14, Sis)
213 T(15, Sis)
215 DEBUG_FINI
217 if (fails != 0)
218 abort ();
220 #undef T