|
|
1.1 root 1: /* The Plum Hall Validation Suite for C
2: * Unpublished copyright (c) 1986-1991, Chiron Systems Inc and Plum Hall Inc.
3: * VERSION: 4
4: * DATE: 1993-01-01
5: * The "ANSI" mode of the Suite corresponds to the official ANSI C, X3.159-1989.
6: * As per your license agreement, your distribution is not to be moved or copied outside the Designated Site
7: * without specific permission from Plum Hall Inc.
8: */
9:
10: #define ANSI 1 /* This file follows ANSI arithmetic rules, which may not work in non-ANSI modes */
11: #include "types.h"
12: int main()
13: {
14: extern char *Filename;
15: auto CHAR Ac = 7;
16: #if ANSI
17: auto SCHAR Asc = 8;
18: #endif
19: auto SHORT As = 9;
20: auto INT Ai = 10;
21: auto UCHAR Auc = 11;
22: auto USHORT Aus = 12;
23: auto UINT Aui = 13;
24: auto LONG Al = 14;
25: auto ULONG Aul = 15;
26: auto FLOAT Af = 16;
27: auto DOUBLE Ad = 17;
28: #if ANSI
29: auto LDOUBLE Ald = 18;
30: #endif
31: {
32: typedef union {
33: CHAR c;
34: SHORT s;
35: INT i;
36: UCHAR uc;
37: USHORT us;
38: UINT ui;
39: LONG l;
40: ULONG ul;
41: FLOAT f;
42: DOUBLE d;
43: #if ANSI
44: SCHAR sc;
45: LDOUBLE ld;
46: #endif
47: } D;
48: auto D D1;
49: #if ANSI
50: auto D D2;
51: #endif
52: auto D D3;
53: auto D D4;
54: auto D D5;
55: auto D D6;
56: auto D D7;
57: auto D D8;
58: auto D D9;
59: auto D D10;
60: auto D D11;
61: #if ANSI
62: auto D D12;
63: #endif
64: D1.c = 7;
65: #if ANSI
66: D2.sc = 8;
67: #endif
68: D3.s = 9;
69: D4.i = 10;
70: D5.uc = 11;
71: D6.us = 12;
72: D7.ui = 13;
73: D8.l = 14;
74: D9.ul = 15;
75: D10.f = 16;
76: D11.d = 17;
77: #if ANSI
78: D12.ld = 18;
79: #endif
80: {
81: int true = 1, false = 0;
82: Filename = " auto scalar auto union timeq3 ";
83: D9.ul = 15; Aus = 12;
84: D9.ul *= Aus;
85: lequals(__LINE__, D9.ul, (ULONG)180L);
86: D9.ul = 15;
87: lequals(__LINE__, D9.ul *= Aus, (ULONG)180L);
88: Aus = 12; D10.f = 16;
89: Aus *= D10.f;
90: iequals(__LINE__, Aus, (USHORT)192);
91: Aus = 12;
92: iequals(__LINE__, Aus *= D10.f, (USHORT)192);
93: D10.f = 16; Aus = 12;
94: D10.f *= Aus;
95: dequals(__LINE__, D10.f, (FLOAT)192.);
96: D10.f = 16;
97: dequals(__LINE__, D10.f *= Aus, (FLOAT)192.);
98: Aus = 12; D11.d = 17;
99: Aus *= D11.d;
100: iequals(__LINE__, Aus, (USHORT)204);
101: Aus = 12;
102: iequals(__LINE__, Aus *= D11.d, (USHORT)204);
103: D11.d = 17; Aus = 12;
104: D11.d *= Aus;
105: dequals(__LINE__, D11.d, (DOUBLE)204.);
106: D11.d = 17;
107: dequals(__LINE__, D11.d *= Aus, (DOUBLE)204.);
108: #if ANSI
109: Aus = 12; D12.ld = 18;
110: Aus *= D12.ld;
111: iequals(__LINE__, Aus, (USHORT)216);
112: Aus = 12;
113: iequals(__LINE__, Aus *= D12.ld, (USHORT)216);
114: D12.ld = 18; Aus = 12;
115: D12.ld *= Aus;
116: ldequals(__LINE__, D12.ld, (LDOUBLE)216.L);
117: D12.ld = 18;
118: ldequals(__LINE__, D12.ld *= Aus, (LDOUBLE)216.L);
119: #endif
120: Aui = 13; D1.c = 7;
121: Aui *= D1.c;
122: iequals(__LINE__, Aui, (UINT)91);
123: Aui = 13;
124: iequals(__LINE__, Aui *= D1.c, (UINT)91);
125: D1.c = 7; Aui = 13;
126: D1.c *= Aui;
127: iequals(__LINE__, D1.c, (CHAR)91);
128: D1.c = 7;
129: iequals(__LINE__, D1.c *= Aui, (CHAR)91);
130: #if ANSI
131: Aui = 13; D2.sc = 8;
132: Aui *= D2.sc;
133: iequals(__LINE__, Aui, (UINT)104);
134: Aui = 13;
135: iequals(__LINE__, Aui *= D2.sc, (UINT)104);
136: D2.sc = 8; Aui = 13;
137: D2.sc *= Aui;
138: iequals(__LINE__, D2.sc, (SCHAR)104);
139: D2.sc = 8;
140: iequals(__LINE__, D2.sc *= Aui, (SCHAR)104);
141: #endif
142: Aui = 13; D3.s = 9;
143: Aui *= D3.s;
144: iequals(__LINE__, Aui, (UINT)117);
145: Aui = 13;
146: iequals(__LINE__, Aui *= D3.s, (UINT)117);
147: D3.s = 9; Aui = 13;
148: D3.s *= Aui;
149: iequals(__LINE__, D3.s, (SHORT)117);
150: D3.s = 9;
151: iequals(__LINE__, D3.s *= Aui, (SHORT)117);
152: Aui = 13; D4.i = 10;
153: Aui *= D4.i;
154: iequals(__LINE__, Aui, (UINT)130);
155: Aui = 13;
156: iequals(__LINE__, Aui *= D4.i, (UINT)130);
157: D4.i = 10; Aui = 13;
158: D4.i *= Aui;
159: iequals(__LINE__, D4.i, (INT)130);
160: D4.i = 10;
161: iequals(__LINE__, D4.i *= Aui, (INT)130);
162: Aui = 13; D5.uc = 11;
163: Aui *= D5.uc;
164: iequals(__LINE__, Aui, (UINT)143);
165: Aui = 13;
166: iequals(__LINE__, Aui *= D5.uc, (UINT)143);
167: D5.uc = 11; Aui = 13;
168: D5.uc *= Aui;
169: iequals(__LINE__, D5.uc, (UCHAR)143);
170: D5.uc = 11;
171: iequals(__LINE__, D5.uc *= Aui, (UCHAR)143);
172: Aui = 13; D6.us = 12;
173: Aui *= D6.us;
174: iequals(__LINE__, Aui, (UINT)156);
175: Aui = 13;
176: iequals(__LINE__, Aui *= D6.us, (UINT)156);
177: D6.us = 12; Aui = 13;
178: D6.us *= Aui;
179: iequals(__LINE__, D6.us, (USHORT)156);
180: D6.us = 12;
181: iequals(__LINE__, D6.us *= Aui, (USHORT)156);
182: Aui = 13; D7.ui = 13;
183: Aui *= D7.ui;
184: iequals(__LINE__, Aui, (UINT)169);
185: Aui = 13;
186: iequals(__LINE__, Aui *= D7.ui, (UINT)169);
187: D7.ui = 13; Aui = 13;
188: D7.ui *= Aui;
189: iequals(__LINE__, D7.ui, (UINT)169);
190: D7.ui = 13;
191: iequals(__LINE__, D7.ui *= Aui, (UINT)169);
192: Aui = 13; D8.l = 14;
193: Aui *= D8.l;
194: iequals(__LINE__, Aui, (UINT)182);
195: Aui = 13;
196: iequals(__LINE__, Aui *= D8.l, (UINT)182);
197: D8.l = 14; Aui = 13;
198: D8.l *= Aui;
199: lequals(__LINE__, D8.l, (LONG)182L);
200: D8.l = 14;
201: lequals(__LINE__, D8.l *= Aui, (LONG)182L);
202: Aui = 13; D9.ul = 15;
203: Aui *= D9.ul;
204: iequals(__LINE__, Aui, (UINT)195);
205: Aui = 13;
206: iequals(__LINE__, Aui *= D9.ul, (UINT)195);
207: D9.ul = 15; Aui = 13;
208: D9.ul *= Aui;
209: lequals(__LINE__, D9.ul, (ULONG)195L);
210: D9.ul = 15;
211: lequals(__LINE__, D9.ul *= Aui, (ULONG)195L);
212: Aui = 13; D10.f = 16;
213: Aui *= D10.f;
214: iequals(__LINE__, Aui, (UINT)208);
215: Aui = 13;
216: iequals(__LINE__, Aui *= D10.f, (UINT)208);
217: D10.f = 16; Aui = 13;
218: D10.f *= Aui;
219: dequals(__LINE__, D10.f, (FLOAT)208.);
220: D10.f = 16;
221: dequals(__LINE__, D10.f *= Aui, (FLOAT)208.);
222: Aui = 13; D11.d = 17;
223: Aui *= D11.d;
224: iequals(__LINE__, Aui, (UINT)221);
225: Aui = 13;
226: iequals(__LINE__, Aui *= D11.d, (UINT)221);
227: D11.d = 17; Aui = 13;
228: D11.d *= Aui;
229: dequals(__LINE__, D11.d, (DOUBLE)221.);
230: D11.d = 17;
231: dequals(__LINE__, D11.d *= Aui, (DOUBLE)221.);
232: #if ANSI
233: Aui = 13; D12.ld = 18;
234: Aui *= D12.ld;
235: iequals(__LINE__, Aui, (UINT)234);
236: Aui = 13;
237: iequals(__LINE__, Aui *= D12.ld, (UINT)234);
238: D12.ld = 18; Aui = 13;
239: D12.ld *= Aui;
240: ldequals(__LINE__, D12.ld, (LDOUBLE)234.L);
241: D12.ld = 18;
242: ldequals(__LINE__, D12.ld *= Aui, (LDOUBLE)234.L);
243: #endif
244: Al = 14; D1.c = 7;
245: Al *= D1.c;
246: lequals(__LINE__, Al, (LONG)98L);
247: Al = 14;
248: lequals(__LINE__, Al *= D1.c, (LONG)98L);
249: D1.c = 7; Al = 14;
250: D1.c *= Al;
251: iequals(__LINE__, D1.c, (CHAR)98);
252: D1.c = 7;
253: iequals(__LINE__, D1.c *= Al, (CHAR)98);
254: #if ANSI
255: Al = 14; D2.sc = 8;
256: Al *= D2.sc;
257: lequals(__LINE__, Al, (LONG)112L);
258: Al = 14;
259: lequals(__LINE__, Al *= D2.sc, (LONG)112L);
260: D2.sc = 8; Al = 14;
261: D2.sc *= Al;
262: iequals(__LINE__, D2.sc, (SCHAR)112);
263: D2.sc = 8;
264: iequals(__LINE__, D2.sc *= Al, (SCHAR)112);
265: #endif
266: Al = 14; D3.s = 9;
267: Al *= D3.s;
268: lequals(__LINE__, Al, (LONG)126L);
269: Al = 14;
270: lequals(__LINE__, Al *= D3.s, (LONG)126L);
271: D3.s = 9; Al = 14;
272: D3.s *= Al;
273: iequals(__LINE__, D3.s, (SHORT)126);
274: D3.s = 9;
275: iequals(__LINE__, D3.s *= Al, (SHORT)126);
276: Al = 14; D4.i = 10;
277: Al *= D4.i;
278: lequals(__LINE__, Al, (LONG)140L);
279: Al = 14;
280: lequals(__LINE__, Al *= D4.i, (LONG)140L);
281: D4.i = 10; Al = 14;
282: D4.i *= Al;
283: iequals(__LINE__, D4.i, (INT)140);
284: D4.i = 10;
285: iequals(__LINE__, D4.i *= Al, (INT)140);
286: Al = 14; D5.uc = 11;
287: Al *= D5.uc;
288: lequals(__LINE__, Al, (LONG)154L);
289: Al = 14;
290: lequals(__LINE__, Al *= D5.uc, (LONG)154L);
291: D5.uc = 11; Al = 14;
292: D5.uc *= Al;
293: iequals(__LINE__, D5.uc, (UCHAR)154);
294: D5.uc = 11;
295: iequals(__LINE__, D5.uc *= Al, (UCHAR)154);
296: Al = 14; D6.us = 12;
297: Al *= D6.us;
298: lequals(__LINE__, Al, (LONG)168L);
299: Al = 14;
300: lequals(__LINE__, Al *= D6.us, (LONG)168L);
301: D6.us = 12; Al = 14;
302: D6.us *= Al;
303: iequals(__LINE__, D6.us, (USHORT)168);
304: D6.us = 12;
305: iequals(__LINE__, D6.us *= Al, (USHORT)168);
306: Al = 14; D7.ui = 13;
307: Al *= D7.ui;
308: lequals(__LINE__, Al, (LONG)182L);
309: Al = 14;
310: lequals(__LINE__, Al *= D7.ui, (LONG)182L);
311: D7.ui = 13; Al = 14;
312: D7.ui *= Al;
313: iequals(__LINE__, D7.ui, (UINT)182);
314: D7.ui = 13;
315: iequals(__LINE__, D7.ui *= Al, (UINT)182);
316: Al = 14; D8.l = 14;
317: Al *= D8.l;
318: lequals(__LINE__, Al, (LONG)196L);
319: Al = 14;
320: lequals(__LINE__, Al *= D8.l, (LONG)196L);
321: D8.l = 14; Al = 14;
322: D8.l *= Al;
323: lequals(__LINE__, D8.l, (LONG)196L);
324: D8.l = 14;
325: lequals(__LINE__, D8.l *= Al, (LONG)196L);
326: Al = 14; D9.ul = 15;
327: Al *= D9.ul;
328: lequals(__LINE__, Al, (LONG)210L);
329: Al = 14;
330: lequals(__LINE__, Al *= D9.ul, (LONG)210L);
331: D9.ul = 15; Al = 14;
332: D9.ul *= Al;
333: lequals(__LINE__, D9.ul, (ULONG)210L);
334: D9.ul = 15;
335: lequals(__LINE__, D9.ul *= Al, (ULONG)210L);
336: Al = 14; D10.f = 16;
337: Al *= D10.f;
338: lequals(__LINE__, Al, (LONG)224L);
339: Al = 14;
340: lequals(__LINE__, Al *= D10.f, (LONG)224L);
341: D10.f = 16; Al = 14;
342: D10.f *= Al;
343: dequals(__LINE__, D10.f, (FLOAT)224.);
344: D10.f = 16;
345: dequals(__LINE__, D10.f *= Al, (FLOAT)224.);
346: Al = 14; D11.d = 17;
347: Al *= D11.d;
348: lequals(__LINE__, Al, (LONG)238L);
349: Al = 14;
350: lequals(__LINE__, Al *= D11.d, (LONG)238L);
351: D11.d = 17; Al = 14;
352: D11.d *= Al;
353: dequals(__LINE__, D11.d, (DOUBLE)238.);
354: D11.d = 17;
355: dequals(__LINE__, D11.d *= Al, (DOUBLE)238.);
356: #if ANSI
357: Al = 14; D12.ld = 18;
358: Al *= D12.ld;
359: lequals(__LINE__, Al, (LONG)252L);
360: Al = 14;
361: lequals(__LINE__, Al *= D12.ld, (LONG)252L);
362: D12.ld = 18; Al = 14;
363: D12.ld *= Al;
364: ldequals(__LINE__, D12.ld, (LDOUBLE)252.L);
365: D12.ld = 18;
366: ldequals(__LINE__, D12.ld *= Al, (LDOUBLE)252.L);
367: #endif
368: Aul = 15; D1.c = 7;
369: Aul *= D1.c;
370: lequals(__LINE__, Aul, (ULONG)105L);
371: Aul = 15;
372: lequals(__LINE__, Aul *= D1.c, (ULONG)105L);
373: D1.c = 7; Aul = 15;
374: D1.c *= Aul;
375: iequals(__LINE__, D1.c, (CHAR)105);
376: D1.c = 7;
377: iequals(__LINE__, D1.c *= Aul, (CHAR)105);
378: #if ANSI
379: Aul = 15; D2.sc = 8;
380: Aul *= D2.sc;
381: lequals(__LINE__, Aul, (ULONG)120L);
382: Aul = 15;
383: lequals(__LINE__, Aul *= D2.sc, (ULONG)120L);
384: D2.sc = 8; Aul = 15;
385: D2.sc *= Aul;
386: iequals(__LINE__, D2.sc, (SCHAR)120);
387: D2.sc = 8;
388: iequals(__LINE__, D2.sc *= Aul, (SCHAR)120);
389: #endif
390: Aul = 15; D3.s = 9;
391: Aul *= D3.s;
392: lequals(__LINE__, Aul, (ULONG)135L);
393: Aul = 15;
394: lequals(__LINE__, Aul *= D3.s, (ULONG)135L);
395: D3.s = 9; Aul = 15;
396: D3.s *= Aul;
397: iequals(__LINE__, D3.s, (SHORT)135);
398: D3.s = 9;
399: iequals(__LINE__, D3.s *= Aul, (SHORT)135);
400: Aul = 15; D4.i = 10;
401: Aul *= D4.i;
402: lequals(__LINE__, Aul, (ULONG)150L);
403: Aul = 15;
404: lequals(__LINE__, Aul *= D4.i, (ULONG)150L);
405: D4.i = 10; Aul = 15;
406: D4.i *= Aul;
407: iequals(__LINE__, D4.i, (INT)150);
408: D4.i = 10;
409: iequals(__LINE__, D4.i *= Aul, (INT)150);
410: Aul = 15; D5.uc = 11;
411: Aul *= D5.uc;
412: lequals(__LINE__, Aul, (ULONG)165L);
413: Aul = 15;
414: lequals(__LINE__, Aul *= D5.uc, (ULONG)165L);
415: D5.uc = 11; Aul = 15;
416: D5.uc *= Aul;
417: iequals(__LINE__, D5.uc, (UCHAR)165);
418: D5.uc = 11;
419: iequals(__LINE__, D5.uc *= Aul, (UCHAR)165);
420: Aul = 15; D6.us = 12;
421: Aul *= D6.us;
422: lequals(__LINE__, Aul, (ULONG)180L);
423: Aul = 15;
424: lequals(__LINE__, Aul *= D6.us, (ULONG)180L);
425: D6.us = 12; Aul = 15;
426: D6.us *= Aul;
427: iequals(__LINE__, D6.us, (USHORT)180);
428: D6.us = 12;
429: iequals(__LINE__, D6.us *= Aul, (USHORT)180);
430: Aul = 15; D7.ui = 13;
431: Aul *= D7.ui;
432: lequals(__LINE__, Aul, (ULONG)195L);
433: Aul = 15;
434: lequals(__LINE__, Aul *= D7.ui, (ULONG)195L);
435: D7.ui = 13; Aul = 15;
436: D7.ui *= Aul;
437: iequals(__LINE__, D7.ui, (UINT)195);
438: D7.ui = 13;
439: iequals(__LINE__, D7.ui *= Aul, (UINT)195);
440: Aul = 15; D8.l = 14;
441: Aul *= D8.l;
442: lequals(__LINE__, Aul, (ULONG)210L);
443: Aul = 15;
444: lequals(__LINE__, Aul *= D8.l, (ULONG)210L);
445: D8.l = 14; Aul = 15;
446: D8.l *= Aul;
447: lequals(__LINE__, D8.l, (LONG)210L);
448: D8.l = 14;
449: lequals(__LINE__, D8.l *= Aul, (LONG)210L);
450: Aul = 15; D9.ul = 15;
451: Aul *= D9.ul;
452: lequals(__LINE__, Aul, (ULONG)225L);
453: Aul = 15;
454: lequals(__LINE__, Aul *= D9.ul, (ULONG)225L);
455: D9.ul = 15; Aul = 15;
456: D9.ul *= Aul;
457: lequals(__LINE__, D9.ul, (ULONG)225L);
458: D9.ul = 15;
459: lequals(__LINE__, D9.ul *= Aul, (ULONG)225L);
460: Aul = 15; D10.f = 16;
461: Aul *= D10.f;
462: lequals(__LINE__, Aul, (ULONG)240L);
463: Aul = 15;
464: lequals(__LINE__, Aul *= D10.f, (ULONG)240L);
465: D10.f = 16; Aul = 15;
466: D10.f *= Aul;
467: dequals(__LINE__, D10.f, (FLOAT)240.);
468: D10.f = 16;
469: dequals(__LINE__, D10.f *= Aul, (FLOAT)240.);
470: Aul = 15; D11.d = 17;
471: Aul *= D11.d;
472: lequals(__LINE__, Aul, (ULONG)255L);
473: Aul = 15;
474: lequals(__LINE__, Aul *= D11.d, (ULONG)255L);
475: D11.d = 17; Aul = 15;
476: D11.d *= Aul;
477: dequals(__LINE__, D11.d, (DOUBLE)255.);
478: D11.d = 17;
479: dequals(__LINE__, D11.d *= Aul, (DOUBLE)255.);
480: #if ANSI
481: Aul = 15; D12.ld = 18;
482: Aul *= D12.ld;
483: lequals(__LINE__, Aul, (ULONG)270L);
484: Aul = 15;
485: lequals(__LINE__, Aul *= D12.ld, (ULONG)270L);
486: #endif
487: }}
488: return report(Filename);
489: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.