]> git.pld-linux.org Git - packages/gcc.git/blame - gcc32-test-rotate.patch
projects / packages / gcc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
- release 4 - rebuild with requires for modern rpm
[packages/gcc.git] / gcc32-test-rotate.patch
CommitLineData
5384b728 12002-05-08 Tom Rix <trix@redhat.com>
2
3 * gcc.c-torture/execute/20020508-1.c: New test.
4 * gcc.c-torture/execute/20020508-2.c: New test.
5 * gcc.c-torture/execute/20020508-3.c: New test.
6
7--- gcc/testsuite/gcc.c-torture/execute/20020508-1.c.jj Wed May 15 14:22:47 2002
8+++ gcc/testsuite/gcc.c-torture/execute/20020508-1.c Wed May 15 14:22:47 2002
9@@ -0,0 +1,104 @@
10+/* This tests the rotate patterns that some machines support. */
11+
12+#include <limits.h>
13+
14+#ifndef CHAR_BIT
15+#define CHAR_BIT 8
16+#endif
17+
18+#define ROR(a,b) (((a) >> (b)) | ((a) << ((sizeof (a) * CHAR_BIT) - (b))))
19+#define ROL(a,b) (((a) << (b)) | ((a) >> ((sizeof (a) * CHAR_BIT) - (b))))
20+
21+#define CHAR_VALUE ((unsigned char)0xf234U)
22+#define SHORT_VALUE ((unsigned short)0xf234U)
23+#define INT_VALUE 0xf234U
24+#define LONG_VALUE 0xf2345678LU
25+#define LL_VALUE 0xf2345678abcdef0LLU
26+
27+#define SHIFT1 4
28+#define SHIFT2 ((sizeof (long long) * CHAR_BIT) - SHIFT1)
29+
30+unsigned char uc = CHAR_VALUE;
31+unsigned short us = SHORT_VALUE;
32+unsigned int ui = INT_VALUE;
33+unsigned long ul = LONG_VALUE;
34+unsigned long long ull = LL_VALUE;
35+int shift1 = SHIFT1;
36+int shift2 = SHIFT2;
37+
38+main ()
39+{
40+ if (ROR (uc, shift1) != ROR (CHAR_VALUE, SHIFT1))
41+ abort ();
42+
43+ if (ROR (uc, SHIFT1) != ROR (CHAR_VALUE, SHIFT1))
44+ abort ();
45+
46+ if (ROR (us, shift1) != ROR (SHORT_VALUE, SHIFT1))
47+ abort ();
48+
49+ if (ROR (us, SHIFT1) != ROR (SHORT_VALUE, SHIFT1))
50+ abort ();
51+
52+ if (ROR (ui, shift1) != ROR (INT_VALUE, SHIFT1))
53+ abort ();
54+
55+ if (ROR (ui, SHIFT1) != ROR (INT_VALUE, SHIFT1))
56+ abort ();
57+
58+ if (ROR (ul, shift1) != ROR (LONG_VALUE, SHIFT1))
59+ abort ();
60+
61+ if (ROR (ul, SHIFT1) != ROR (LONG_VALUE, SHIFT1))
62+ abort ();
63+
64+ if (ROR (ull, shift1) != ROR (LL_VALUE, SHIFT1))
65+ abort ();
66+
67+ if (ROR (ull, SHIFT1) != ROR (LL_VALUE, SHIFT1))
68+ abort ();
69+
70+ if (ROR (ull, shift2) != ROR (LL_VALUE, SHIFT2))
71+ abort ();
72+
73+ if (ROR (ull, SHIFT2) != ROR (LL_VALUE, SHIFT2))
74+ abort ();
75+
76+ if (ROL (uc, shift1) != ROL (CHAR_VALUE, SHIFT1))
77+ abort ();
78+
79+ if (ROL (uc, SHIFT1) != ROL (CHAR_VALUE, SHIFT1))
80+ abort ();
81+
82+ if (ROL (us, shift1) != ROL (SHORT_VALUE, SHIFT1))
83+ abort ();
84+
85+ if (ROL (us, SHIFT1) != ROL (SHORT_VALUE, SHIFT1))
86+ abort ();
87+
88+ if (ROL (ui, shift1) != ROL (INT_VALUE, SHIFT1))
89+ abort ();
90+
91+ if (ROL (ui, SHIFT1) != ROL (INT_VALUE, SHIFT1))
92+ abort ();
93+
94+ if (ROL (ul, shift1) != ROL (LONG_VALUE, SHIFT1))
95+ abort ();
96+
97+ if (ROL (ul, SHIFT1) != ROL (LONG_VALUE, SHIFT1))
98+ abort ();
99+
100+ if (ROL (ull, shift1) != ROL (LL_VALUE, SHIFT1))
101+ abort ();
102+
103+ if (ROL (ull, SHIFT1) != ROL (LL_VALUE, SHIFT1))
104+ abort ();
105+
106+ if (ROL (ull, shift2) != ROL (LL_VALUE, SHIFT2))
107+ abort ();
108+
109+ if (ROL (ull, SHIFT2) != ROL (LL_VALUE, SHIFT2))
110+ abort ();
111+
112+ exit (0);
113+}
114--- gcc/testsuite/gcc.c-torture/execute/20020508-2.c.jj Wed May 15 14:22:47 2002
115+++ gcc/testsuite/gcc.c-torture/execute/20020508-2.c Wed May 15 14:22:47 2002
116@@ -0,0 +1,102 @@
117+#include <limits.h>
118+
119+#ifndef CHAR_BIT
120+#define CHAR_BIT 8
121+#endif
122+
123+#define ROR(a,b) (((a) >> (b)) | ((a) << ((sizeof (a) * CHAR_BIT) - (b))))
124+#define ROL(a,b) (((a) << (b)) | ((a) >> ((sizeof (a) * CHAR_BIT) - (b))))
125+
126+#define CHAR_VALUE ((char)0x1234)
127+#define SHORT_VALUE ((short)0x1234)
128+#define INT_VALUE ((int)0x1234)
129+#define LONG_VALUE ((long)0x12345678L)
130+#define LL_VALUE ((long long)0x12345678abcdef0LL)
131+
132+#define SHIFT1 4
133+#define SHIFT2 ((sizeof (long long) * CHAR_BIT) - SHIFT1)
134+
135+char c = CHAR_VALUE;
136+short s = SHORT_VALUE;
137+int i = INT_VALUE;
138+long l = LONG_VALUE;
139+long long ll = LL_VALUE;
140+int shift1 = SHIFT1;
141+int shift2 = SHIFT2;
142+
143+main ()
144+{
145+ if (ROR (c, shift1) != ROR (CHAR_VALUE, SHIFT1))
146+ abort ();
147+
148+ if (ROR (c, SHIFT1) != ROR (CHAR_VALUE, SHIFT1))
149+ abort ();
150+
151+ if (ROR (s, shift1) != ROR (SHORT_VALUE, SHIFT1))
152+ abort ();
153+
154+ if (ROR (s, SHIFT1) != ROR (SHORT_VALUE, SHIFT1))
155+ abort ();
156+
157+ if (ROR (i, shift1) != ROR (INT_VALUE, SHIFT1))
158+ abort ();
159+
160+ if (ROR (i, SHIFT1) != ROR (INT_VALUE, SHIFT1))
161+ abort ();
162+
163+ if (ROR (l, shift1) != ROR (LONG_VALUE, SHIFT1))
164+ abort ();
165+
166+ if (ROR (l, SHIFT1) != ROR (LONG_VALUE, SHIFT1))
167+ abort ();
168+
169+ if (ROR (ll, shift1) != ROR (LL_VALUE, SHIFT1))
170+ abort ();
171+
172+ if (ROR (ll, SHIFT1) != ROR (LL_VALUE, SHIFT1))
173+ abort ();
174+
175+ if (ROR (ll, shift2) != ROR (LL_VALUE, SHIFT2))
176+ abort ();
177+
178+ if (ROR (ll, SHIFT2) != ROR (LL_VALUE, SHIFT2))
179+ abort ();
180+
181+ if (ROL (c, shift1) != ROL (CHAR_VALUE, SHIFT1))
182+ abort ();
183+
184+ if (ROL (c, SHIFT1) != ROL (CHAR_VALUE, SHIFT1))
185+ abort ();
186+
187+ if (ROL (s, shift1) != ROL (SHORT_VALUE, SHIFT1))
188+ abort ();
189+
190+ if (ROL (s, SHIFT1) != ROL (SHORT_VALUE, SHIFT1))
191+ abort ();
192+
193+ if (ROL (i, shift1) != ROL (INT_VALUE, SHIFT1))
194+ abort ();
195+
196+ if (ROL (i, SHIFT1) != ROL (INT_VALUE, SHIFT1))
197+ abort ();
198+
199+ if (ROL (l, shift1) != ROL (LONG_VALUE, SHIFT1))
200+ abort ();
201+
202+ if (ROL (l, SHIFT1) != ROL (LONG_VALUE, SHIFT1))
203+ abort ();
204+
205+ if (ROL (ll, shift1) != ROL (LL_VALUE, SHIFT1))
206+ abort ();
207+
208+ if (ROL (ll, SHIFT1) != ROL (LL_VALUE, SHIFT1))
209+ abort ();
210+
211+ if (ROL (ll, shift2) != ROL (LL_VALUE, SHIFT2))
212+ abort ();
213+
214+ if (ROL (ll, SHIFT2) != ROL (LL_VALUE, SHIFT2))
215+ abort ();
216+
217+ exit (0);
218+}
219--- gcc/testsuite/gcc.c-torture/execute/20020508-3.c.jj Wed May 15 14:22:47 2002
220+++ gcc/testsuite/gcc.c-torture/execute/20020508-3.c Wed May 15 14:22:47 2002
221@@ -0,0 +1,102 @@
222+#include <limits.h>
223+
224+#ifndef CHAR_BIT
225+#define CHAR_BIT 8
226+#endif
227+
228+#define ROR(a,b) (((a) >> (b)) | ((a) << ((sizeof (a) * CHAR_BIT) - (b))))
229+#define ROL(a,b) (((a) << (b)) | ((a) >> ((sizeof (a) * CHAR_BIT) - (b))))
230+
231+#define CHAR_VALUE ((char)0xf234)
232+#define SHORT_VALUE ((short)0xf234)
233+#define INT_VALUE ((int)0xf234)
234+#define LONG_VALUE ((long)0xf2345678L)
235+#define LL_VALUE ((long long)0xf2345678abcdef0LL)
236+
237+#define SHIFT1 4
238+#define SHIFT2 ((sizeof (long long) * CHAR_BIT) - SHIFT1)
239+
240+char c = CHAR_VALUE;
241+short s = SHORT_VALUE;
242+int i = INT_VALUE;
243+long l = LONG_VALUE;
244+long long ll = LL_VALUE;
245+int shift1 = SHIFT1;
246+int shift2 = SHIFT2;
247+
248+main ()
249+{
250+ if (ROR (c, shift1) != ROR (CHAR_VALUE, SHIFT1))
251+ abort ();
252+
253+ if (ROR (c, SHIFT1) != ROR (CHAR_VALUE, SHIFT1))
254+ abort ();
255+
256+ if (ROR (s, shift1) != ROR (SHORT_VALUE, SHIFT1))
257+ abort ();
258+
259+ if (ROR (s, SHIFT1) != ROR (SHORT_VALUE, SHIFT1))
260+ abort ();
261+
262+ if (ROR (i, shift1) != ROR (INT_VALUE, SHIFT1))
263+ abort ();
264+
265+ if (ROR (i, SHIFT1) != ROR (INT_VALUE, SHIFT1))
266+ abort ();
267+
268+ if (ROR (l, shift1) != ROR (LONG_VALUE, SHIFT1))
269+ abort ();
270+
271+ if (ROR (l, SHIFT1) != ROR (LONG_VALUE, SHIFT1))
272+ abort ();
273+
274+ if (ROR (ll, shift1) != ROR (LL_VALUE, SHIFT1))
275+ abort ();
276+
277+ if (ROR (ll, SHIFT1) != ROR (LL_VALUE, SHIFT1))
278+ abort ();
279+
280+ if (ROR (ll, shift2) != ROR (LL_VALUE, SHIFT2))
281+ abort ();
282+
283+ if (ROR (ll, SHIFT2) != ROR (LL_VALUE, SHIFT2))
284+ abort ();
285+
286+ if (ROL (c, shift1) != ROL (CHAR_VALUE, SHIFT1))
287+ abort ();
288+
289+ if (ROL (c, SHIFT1) != ROL (CHAR_VALUE, SHIFT1))
290+ abort ();
291+
292+ if (ROL (s, shift1) != ROL (SHORT_VALUE, SHIFT1))
293+ abort ();
294+
295+ if (ROL (s, SHIFT1) != ROL (SHORT_VALUE, SHIFT1))
296+ abort ();
297+
298+ if (ROL (i, shift1) != ROL (INT_VALUE, SHIFT1))
299+ abort ();
300+
301+ if (ROL (i, SHIFT1) != ROL (INT_VALUE, SHIFT1))
302+ abort ();
303+
304+ if (ROL (l, shift1) != ROL (LONG_VALUE, SHIFT1))
305+ abort ();
306+
307+ if (ROL (l, SHIFT1) != ROL (LONG_VALUE, SHIFT1))
308+ abort ();
309+
310+ if (ROL (ll, shift1) != ROL (LL_VALUE, SHIFT1))
311+ abort ();
312+
313+ if (ROL (ll, SHIFT1) != ROL (LL_VALUE, SHIFT1))
314+ abort ();
315+
316+ if (ROL (ll, shift2) != ROL (LL_VALUE, SHIFT2))
317+ abort ();
318+
319+ if (ROL (ll, SHIFT2) != ROL (LL_VALUE, SHIFT2))
320+ abort ();
321+
322+ exit (0);
323+}
GNU Compiler Collection: the C compiler and shared files
This page took 0.139906 seconds and 4 git commands to generate.