OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [binary-constants-1.c] - Blame information for rev 826

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
/* Test for binary integer constants.  */
2
 
3
/* Derived from: c99-intconst-1.c, bye Joseph Myers <jsm28@cam.ac.uk>.  */
4
/* Origin: Joerg Wunsch <j.gnu@uriah.heep.sax.de>.  */
5
/* { dg-do compile } */
6
/* { dg-options "-std=gnu99" } */
7
 
8
#include <limits.h>
9
 
10
/* Assertion that constant C is of type T.  */
11
#define ASSERT_CONST_TYPE(C, T)                 \
12
        do {                                    \
13
          typedef T type;                       \
14
          typedef type **typepp;                \
15
          typedef __typeof__((C)) ctype;        \
16
          typedef ctype **ctypepp;              \
17
          typepp x = 0;                          \
18
          ctypepp y = 0;                 \
19
          x = y;                                \
20
          y = x;                                \
21
        } while (0)
22
 
23
/* (T *) if E is zero, (void *) otherwise.  */
24
#define type_if_not(T, E) __typeof__(0 ? (T *)0 : (void *)(E))
25
 
26
/* (T *) if E is nonzero, (void *) otherwise.  */
27
#define type_if(T, E) type_if_not(T, !(E))
28
 
29
/* Combine pointer types, all but one (void *).  */
30
#define type_comb2(T1, T2) __typeof__(0 ? (T1)0 : (T2)0)
31
#define type_comb3(T1, T2, T3) type_comb2(T1, type_comb2(T2, T3))
32
#define type_comb4(T1, T2, T3, T4)                              \
33
        type_comb2(T1, type_comb2(T2, type_comb2(T3, T4)))
34
#define type_comb6(T1, T2, T3, T4, T5, T6)                                 \
35
        type_comb2(T1,                                                     \
36
                   type_comb2(T2,                                          \
37
                              type_comb2(T3,                               \
38
                                         type_comb2(T4,                    \
39
                                                    type_comb2(T5, T6)))))
40
 
41
/* (T1 *) if E1, otherwise (T2 *) if E2.  */
42
#define first_of2p(T1, E1, T2, E2) type_comb2(type_if(T1, (E1)),           \
43
                                             type_if(T2, (!(E1) && (E2))))
44
/* (T1 *) if E1, otherwise (T2 *) if E2, otherwise (T3 *) if E3.  */
45
#define first_of3p(T1, E1, T2, E2, T3, E3)                      \
46
        type_comb3(type_if(T1, (E1)),                           \
47
                   type_if(T2, (!(E1) && (E2))),                \
48
                   type_if(T3, (!(E1) && !(E2) && (E3))))
49
/* (T1 *) if E1, otherwise (T2 *) if E2, otherwise (T3 *) if E3, otherwise
50
   (T4 *) if E4.  */
51
#define first_of4p(T1, E1, T2, E2, T3, E3, T4, E4)                      \
52
        type_comb4(type_if(T1, (E1)),                                   \
53
                   type_if(T2, (!(E1) && (E2))),                        \
54
                   type_if(T3, (!(E1) && !(E2) && (E3))),               \
55
                   type_if(T4, (!(E1) && !(E2) && !(E3) && (E4))))
56
/* (T1 *) if E1, otherwise (T2 *) if E2, otherwise (T3 *) if E3, otherwise
57
   (T4 *) if E4, otherwise (T5 *) if E5, otherwise (T6 *) if E6.  */
58
#define first_of6p(T1, E1, T2, E2, T3, E3, T4, E4, T5, E5, T6, E6)          \
59
        type_comb6(type_if(T1, (E1)),                                       \
60
                   type_if(T2, (!(E1) && (E2))),                            \
61
                   type_if(T3, (!(E1) && !(E2) && (E3))),                   \
62
                   type_if(T4, (!(E1) && !(E2) && !(E3) && (E4))),          \
63
                   type_if(T5, (!(E1) && !(E2) && !(E3) && !(E4) && (E5))), \
64
                   type_if(T6, (!(E1) && !(E2) && !(E3)                     \
65
                                && !(E4) && !(E5) && (E6))))
66
 
67
/* Likewise, but return the original type rather than a pointer type.  */
68
#define first_of2(T1, E1, T2, E2)                       \
69
        __typeof__(*((first_of2p(T1, (E1), T2, (E2)))0))
70
#define first_of3(T1, E1, T2, E2, T3, E3)                               \
71
        __typeof__(*((first_of3p(T1, (E1), T2, (E2), T3, (E3)))0))
72
#define first_of4(T1, E1, T2, E2, T3, E3, T4, E4)                           \
73
        __typeof__(*((first_of4p(T1, (E1), T2, (E2), T3, (E3), T4, (E4)))0))
74
#define first_of6(T1, E1, T2, E2, T3, E3, T4, E4, T5, E5, T6, E6)       \
75
        __typeof__(*((first_of6p(T1, (E1), T2, (E2), T3, (E3),          \
76
                                 T4, (E4), T5, (E5), T6, (E6)))0))
77
 
78
/* Types of constants according to the C99 rules.  */
79
#define C99_UNSUF_TYPE(C)                                       \
80
        first_of6(int, (C) <= INT_MAX,                          \
81
                  unsigned int, (C) <= UINT_MAX,                \
82
                  long int, (C) <= LONG_MAX,                    \
83
                  unsigned long int, (C) <= ULONG_MAX,          \
84
                  long long int, (C) <= LLONG_MAX,              \
85
                  unsigned long long int, (C) <= ULLONG_MAX)
86
#define C99_SUFu_TYPE(C)                                        \
87
        first_of3(unsigned int, (C) <= UINT_MAX,                \
88
                  unsigned long int, (C) <= ULONG_MAX,          \
89
                  unsigned long long int, (C) <= ULLONG_MAX)
90
#define C99_SUFl_TYPE(C)                                        \
91
        first_of4(long int, (C) <= LONG_MAX,                    \
92
                  unsigned long int, (C) <= ULONG_MAX,          \
93
                  long long int, (C) <= LLONG_MAX,              \
94
                  unsigned long long int, (C) <= ULLONG_MAX)
95
#define C99_SUFul_TYPE(C)                                       \
96
        first_of2(unsigned long int, (C) <= ULONG_MAX,          \
97
                  unsigned long long int, (C) <= ULLONG_MAX)
98
#define C99_SUFll_TYPE(C)                                       \
99
        first_of2(long long int, (C) <= LLONG_MAX,              \
100
                  unsigned long long int, (C) <= ULLONG_MAX)
101
 
102
/* Checks that constants have correct type.  */
103
#define CHECK_UNSUF_TYPE(C)                             \
104
        ASSERT_CONST_TYPE((C), C99_UNSUF_TYPE((C)))
105
#define CHECK_SUFu_TYPE(C) ASSERT_CONST_TYPE((C), C99_SUFu_TYPE((C)))
106
#define CHECK_SUFl_TYPE(C)                              \
107
        ASSERT_CONST_TYPE((C), C99_SUFl_TYPE((C)))
108
#define CHECK_SUFul_TYPE(C) ASSERT_CONST_TYPE((C), C99_SUFul_TYPE((C)))
109
#define CHECK_SUFll_TYPE(C)                             \
110
        ASSERT_CONST_TYPE((C), C99_SUFll_TYPE((C)))
111
#define CHECK_SUFull_TYPE(C) ASSERT_CONST_TYPE((C), unsigned long long int)
112
 
113
/* Check an octal or hexadecimal value, with all suffixes.  */
114
#define CHECK_CONST(C)                          \
115
        CHECK_UNSUF_TYPE(C);                    \
116
        CHECK_SUFu_TYPE(C##u);                  \
117
        CHECK_SUFu_TYPE(C##U);                  \
118
        CHECK_SUFl_TYPE(C##l);                  \
119
        CHECK_SUFl_TYPE(C##L);                  \
120
        CHECK_SUFul_TYPE(C##ul);                \
121
        CHECK_SUFul_TYPE(C##uL);                \
122
        CHECK_SUFul_TYPE(C##Ul);                \
123
        CHECK_SUFul_TYPE(C##UL);                \
124
        CHECK_SUFll_TYPE(C##ll);                \
125
        CHECK_SUFll_TYPE(C##LL);                \
126
        CHECK_SUFull_TYPE(C##ull);              \
127
        CHECK_SUFull_TYPE(C##uLL);              \
128
        CHECK_SUFull_TYPE(C##Ull);              \
129
        CHECK_SUFull_TYPE(C##ULL);
130
 
131
#define CHECK_BIN_CONST(C)                      \
132
        CHECK_CONST(0b##C);                     \
133
        CHECK_CONST(0B##C);
134
 
135
/* True iff "long long" is at least B bits.  This presumes that (B-2)/3 is at
136
   most 63.  */
137
#define LLONG_AT_LEAST(B)                       \
138
        (LLONG_MAX >> ((B)-2)/3 >> ((B)-2)/3    \
139
         >> ((B)-2 - ((B)-2)/3 - ((B)-2)/3))
140
 
141
#define LLONG_HAS_BITS(B) (LLONG_AT_LEAST((B)) && !LLONG_AT_LEAST((B) + 1))
142
 
143
#define FOO 0b1101
144
#if !FOO
145
# error "preprocessor does not accept binary constants"
146
#endif
147
 
148
void
149
foo (void)
150
{
151
  /* Check all 2^n and 2^n - 1 up to 2^72 - 1.  */
152
  CHECK_BIN_CONST(1);
153
  CHECK_BIN_CONST(10);
154
  CHECK_BIN_CONST(11);
155
  CHECK_BIN_CONST(100);
156
  CHECK_BIN_CONST(111);
157
  CHECK_BIN_CONST(1000);
158
  CHECK_BIN_CONST(1111);
159
  CHECK_BIN_CONST(10000);
160
  CHECK_BIN_CONST(11111);
161
  CHECK_BIN_CONST(100000);
162
  CHECK_BIN_CONST(111111);
163
  CHECK_BIN_CONST(1000000);
164
  CHECK_BIN_CONST(1111111);
165
  CHECK_BIN_CONST(10000000);
166
  CHECK_BIN_CONST(11111111);
167
  CHECK_BIN_CONST(100000000);
168
  CHECK_BIN_CONST(111111111);
169
  CHECK_BIN_CONST(1000000000);
170
  CHECK_BIN_CONST(1111111111);
171
  CHECK_BIN_CONST(10000000000);
172
  CHECK_BIN_CONST(11111111111);
173
  CHECK_BIN_CONST(100000000000);
174
  CHECK_BIN_CONST(111111111111);
175
  CHECK_BIN_CONST(1000000000000);
176
  CHECK_BIN_CONST(1111111111111);
177
  CHECK_BIN_CONST(10000000000000);
178
  CHECK_BIN_CONST(11111111111111);
179
  CHECK_BIN_CONST(100000000000000);
180
  CHECK_BIN_CONST(111111111111111);
181
  CHECK_BIN_CONST(1000000000000000);
182
  CHECK_BIN_CONST(1111111111111111);
183
  CHECK_BIN_CONST(10000000000000000);
184
  CHECK_BIN_CONST(11111111111111111);
185
  CHECK_BIN_CONST(100000000000000000);
186
  CHECK_BIN_CONST(111111111111111111);
187
  CHECK_BIN_CONST(1000000000000000000);
188
  CHECK_BIN_CONST(1111111111111111111);
189
  CHECK_BIN_CONST(10000000000000000000);
190
  CHECK_BIN_CONST(11111111111111111111);
191
  CHECK_BIN_CONST(100000000000000000000);
192
  CHECK_BIN_CONST(111111111111111111111);
193
  CHECK_BIN_CONST(1000000000000000000000);
194
  CHECK_BIN_CONST(1111111111111111111111);
195
  CHECK_BIN_CONST(10000000000000000000000);
196
  CHECK_BIN_CONST(11111111111111111111111);
197
  CHECK_BIN_CONST(100000000000000000000000);
198
  CHECK_BIN_CONST(111111111111111111111111);
199
  CHECK_BIN_CONST(1000000000000000000000000);
200
  CHECK_BIN_CONST(1111111111111111111111111);
201
  CHECK_BIN_CONST(10000000000000000000000000);
202
  CHECK_BIN_CONST(11111111111111111111111111);
203
  CHECK_BIN_CONST(100000000000000000000000000);
204
  CHECK_BIN_CONST(111111111111111111111111111);
205
  CHECK_BIN_CONST(1000000000000000000000000000);
206
  CHECK_BIN_CONST(1111111111111111111111111111);
207
  CHECK_BIN_CONST(10000000000000000000000000000);
208
  CHECK_BIN_CONST(11111111111111111111111111111);
209
  CHECK_BIN_CONST(100000000000000000000000000000);
210
  CHECK_BIN_CONST(111111111111111111111111111111);
211
  CHECK_BIN_CONST(1000000000000000000000000000000);
212
  CHECK_BIN_CONST(1111111111111111111111111111111);
213
  CHECK_BIN_CONST(10000000000000000000000000000000);
214
  CHECK_BIN_CONST(11111111111111111111111111111111);
215
  CHECK_BIN_CONST(100000000000000000000000000000000);
216
  CHECK_BIN_CONST(111111111111111111111111111111111);
217
  CHECK_BIN_CONST(1000000000000000000000000000000000);
218
  CHECK_BIN_CONST(1111111111111111111111111111111111);
219
  CHECK_BIN_CONST(10000000000000000000000000000000000);
220
  CHECK_BIN_CONST(11111111111111111111111111111111111);
221
  CHECK_BIN_CONST(100000000000000000000000000000000000);
222
  CHECK_BIN_CONST(111111111111111111111111111111111111);
223
  CHECK_BIN_CONST(1000000000000000000000000000000000000);
224
  CHECK_BIN_CONST(1111111111111111111111111111111111111);
225
  CHECK_BIN_CONST(10000000000000000000000000000000000000);
226
  CHECK_BIN_CONST(11111111111111111111111111111111111111);
227
  CHECK_BIN_CONST(100000000000000000000000000000000000000);
228
  CHECK_BIN_CONST(111111111111111111111111111111111111111);
229
  CHECK_BIN_CONST(1000000000000000000000000000000000000000);
230
  CHECK_BIN_CONST(1111111111111111111111111111111111111111);
231
  CHECK_BIN_CONST(10000000000000000000000000000000000000000);
232
  CHECK_BIN_CONST(11111111111111111111111111111111111111111);
233
  CHECK_BIN_CONST(100000000000000000000000000000000000000000);
234
  CHECK_BIN_CONST(111111111111111111111111111111111111111111);
235
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000);
236
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111);
237
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000);
238
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111);
239
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000);
240
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111);
241
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000);
242
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111);
243
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000);
244
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111);
245
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000);
246
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111);
247
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000);
248
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111);
249
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000);
250
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111);
251
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000);
252
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111);
253
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000);
254
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111);
255
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000);
256
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111);
257
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000);
258
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111);
259
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000);
260
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111);
261
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000);
262
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111);
263
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000);
264
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111);
265
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000000);
266
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111111);
267
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000000);
268
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111111);
269
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000000);
270
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111111);
271
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000000000);
272
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111111111);
273
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000000000);
274
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111111111);
275
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000000000);
276
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111111111);
277
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000000000000);
278
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111111111111);
279
#if LLONG_AT_LEAST(65)
280
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000000000000);
281
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111111111111);
282
#endif
283
#if LLONG_AT_LEAST(66)
284
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000000000000);
285
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111111111111);
286
#endif
287
#if LLONG_AT_LEAST(67)
288
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000000000000000);
289
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111111111111111);
290
#endif
291
#if LLONG_AT_LEAST(68)
292
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000000000000000);
293
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111111111111111);
294
#endif
295
#if LLONG_AT_LEAST(69)
296
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000000000000000);
297
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111111111111111);
298
#endif
299
#if LLONG_AT_LEAST(70)
300
  CHECK_BIN_CONST(1000000000000000000000000000000000000000000000000000000000000000000000);
301
  CHECK_BIN_CONST(1111111111111111111111111111111111111111111111111111111111111111111111);
302
#endif
303
#if LLONG_AT_LEAST(71)
304
  CHECK_BIN_CONST(10000000000000000000000000000000000000000000000000000000000000000000000);
305
  CHECK_BIN_CONST(11111111111111111111111111111111111111111111111111111111111111111111111);
306
#endif
307
#if LLONG_AT_LEAST(72)
308
  CHECK_BIN_CONST(100000000000000000000000000000000000000000000000000000000000000000000000);
309
  CHECK_BIN_CONST(111111111111111111111111111111111111111111111111111111111111111111111111);
310
#endif
311
}
312
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.