|
|
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 = 21;
22: auto USHORT Aus = 22;
23: auto UINT Aui = 23;
24: auto LONG Al = 14;
25: auto ULONG Aul = 25;
26: auto FLOAT Af = 16;
27: auto DOUBLE Ad = 17;
28: #if ANSI
29: auto LDOUBLE Ald = 18;
30: #endif
31: {
32: auto CHAR Bc = 7;
33: auto CHAR *pBc = &Bc;
34: #if ANSI
35: auto SCHAR Bsc = 8;
36: auto SCHAR *pBsc = &Bsc;
37: #endif
38: auto SHORT Bs = 9;
39: auto SHORT *pBs = &Bs;
40: auto INT Bi = 10;
41: auto INT *pBi = &Bi;
42: auto UCHAR Buc = 21;
43: auto UCHAR *pBuc = &Buc;
44: auto USHORT Bus = 22;
45: auto USHORT *pBus = &Bus;
46: auto UINT Bui = 23;
47: auto UINT *pBui = &Bui;
48: auto LONG Bl = 14;
49: auto LONG *pBl = &Bl;
50: auto ULONG Bul = 25;
51: auto ULONG *pBul = &Bul;
52: auto FLOAT Bf = 16;
53: auto FLOAT *pBf = &Bf;
54: auto DOUBLE Bd = 17;
55: auto DOUBLE *pBd = &Bd;
56: #if ANSI
57: auto LDOUBLE Bld = 18;
58: auto LDOUBLE *pBld = &Bld;
59: #endif
60: {
61: int true = 1, false = 0;
62: Filename = " auto scalar auto pscalar1 mineq3 ";
63: *pBd = 17; Aus = 22;
64: *pBd -= Aus;
65: dequals(__LINE__, *pBd, (DOUBLE)-5.);
66: *pBd = 17;
67: dequals(__LINE__, *pBd -= Aus, (DOUBLE)-5.);
68: #if ANSI
69: Aus = 22; *pBld = 18;
70: Aus -= *pBld;
71: iequals(__LINE__, Aus, (USHORT)4);
72: Aus = 22;
73: iequals(__LINE__, Aus -= *pBld, (USHORT)4);
74: *pBld = 18; Aus = 22;
75: *pBld -= Aus;
76: ldequals(__LINE__, *pBld, (LDOUBLE)-4.L);
77: *pBld = 18;
78: ldequals(__LINE__, *pBld -= Aus, (LDOUBLE)-4.L);
79: #endif
80: Aui = 23; *pBc = 7;
81: Aui -= *pBc;
82: iequals(__LINE__, Aui, (UINT)16);
83: Aui = 23;
84: iequals(__LINE__, Aui -= *pBc, (UINT)16);
85: *pBc = 7; Aui = 23;
86: *pBc -= Aui;
87: iequals(__LINE__, *pBc, (CHAR)-16);
88: *pBc = 7;
89: iequals(__LINE__, *pBc -= Aui, (CHAR)-16);
90: #if ANSI
91: Aui = 23; *pBsc = 8;
92: Aui -= *pBsc;
93: iequals(__LINE__, Aui, (UINT)15);
94: Aui = 23;
95: iequals(__LINE__, Aui -= *pBsc, (UINT)15);
96: *pBsc = 8; Aui = 23;
97: *pBsc -= Aui;
98: iequals(__LINE__, *pBsc, (SCHAR)-15);
99: *pBsc = 8;
100: iequals(__LINE__, *pBsc -= Aui, (SCHAR)-15);
101: #endif
102: Aui = 23; *pBs = 9;
103: Aui -= *pBs;
104: iequals(__LINE__, Aui, (UINT)14);
105: Aui = 23;
106: iequals(__LINE__, Aui -= *pBs, (UINT)14);
107: *pBs = 9; Aui = 23;
108: *pBs -= Aui;
109: iequals(__LINE__, *pBs, (SHORT)(UINT)-14);
110: *pBs = 9;
111: iequals(__LINE__, *pBs -= Aui, (SHORT)(UINT)-14);
112: Aui = 23; *pBi = 10;
113: Aui -= *pBi;
114: iequals(__LINE__, Aui, (UINT)13);
115: Aui = 23;
116: iequals(__LINE__, Aui -= *pBi, (UINT)13);
117: *pBi = 10; Aui = 23;
118: *pBi -= Aui;
119: iequals(__LINE__, *pBi, (INT)(UINT)-13);
120: *pBi = 10;
121: iequals(__LINE__, *pBi -= Aui, (INT)(UINT)-13);
122: Aui = 23; *pBuc = 21;
123: Aui -= *pBuc;
124: iequals(__LINE__, Aui, (UINT)2);
125: Aui = 23;
126: iequals(__LINE__, Aui -= *pBuc, (UINT)2);
127: *pBuc = 21; Aui = 23;
128: *pBuc -= Aui;
129: iequals(__LINE__, *pBuc, (UCHAR)-2);
130: *pBuc = 21;
131: iequals(__LINE__, *pBuc -= Aui, (UCHAR)-2);
132: Aui = 23; *pBus = 22;
133: Aui -= *pBus;
134: iequals(__LINE__, Aui, (UINT)1);
135: Aui = 23;
136: iequals(__LINE__, Aui -= *pBus, (UINT)1);
137: *pBus = 22; Aui = 23;
138: *pBus -= Aui;
139: iequals(__LINE__, *pBus, (USHORT)-1);
140: *pBus = 22;
141: iequals(__LINE__, *pBus -= Aui, (USHORT)-1);
142: Aui = 23; *pBui = 23;
143: Aui -= *pBui;
144: iequals(__LINE__, Aui, (UINT)0);
145: Aui = 23;
146: iequals(__LINE__, Aui -= *pBui, (UINT)0);
147: *pBui = 23; Aui = 23;
148: *pBui -= Aui;
149: iequals(__LINE__, *pBui, (UINT)0);
150: *pBui = 23;
151: iequals(__LINE__, *pBui -= Aui, (UINT)0);
152: Aui = 23; *pBl = 14;
153: Aui -= *pBl;
154: iequals(__LINE__, Aui, (UINT)9);
155: Aui = 23;
156: iequals(__LINE__, Aui -= *pBl, (UINT)9);
157: *pBl = 14; Aui = 23;
158: *pBl -= Aui;
159: lequals(__LINE__, *pBl, (LONG)-9L);
160: *pBl = 14;
161: lequals(__LINE__, *pBl -= Aui, (LONG)-9L);
162: Aui = 23; *pBul = 25;
163: Aui -= *pBul;
164: iequals(__LINE__, Aui, (UINT)-2);
165: Aui = 23;
166: iequals(__LINE__, Aui -= *pBul, (UINT)-2);
167: *pBul = 25; Aui = 23;
168: *pBul -= Aui;
169: lequals(__LINE__, *pBul, (ULONG)2L);
170: *pBul = 25;
171: lequals(__LINE__, *pBul -= Aui, (ULONG)2L);
172: Aui = 23; *pBf = 16;
173: Aui -= *pBf;
174: iequals(__LINE__, Aui, (UINT)7);
175: Aui = 23;
176: iequals(__LINE__, Aui -= *pBf, (UINT)7);
177: *pBf = 16; Aui = 23;
178: *pBf -= Aui;
179: dequals(__LINE__, *pBf, (FLOAT)-7.);
180: *pBf = 16;
181: dequals(__LINE__, *pBf -= Aui, (FLOAT)-7.);
182: Aui = 23; *pBd = 17;
183: Aui -= *pBd;
184: iequals(__LINE__, Aui, (UINT)6);
185: Aui = 23;
186: iequals(__LINE__, Aui -= *pBd, (UINT)6);
187: *pBd = 17; Aui = 23;
188: *pBd -= Aui;
189: dequals(__LINE__, *pBd, (DOUBLE)-6.);
190: *pBd = 17;
191: dequals(__LINE__, *pBd -= Aui, (DOUBLE)-6.);
192: #if ANSI
193: Aui = 23; *pBld = 18;
194: Aui -= *pBld;
195: iequals(__LINE__, Aui, (UINT)5);
196: Aui = 23;
197: iequals(__LINE__, Aui -= *pBld, (UINT)5);
198: *pBld = 18; Aui = 23;
199: *pBld -= Aui;
200: ldequals(__LINE__, *pBld, (LDOUBLE)-5.L);
201: *pBld = 18;
202: ldequals(__LINE__, *pBld -= Aui, (LDOUBLE)-5.L);
203: #endif
204: Al = 14; *pBc = 7;
205: Al -= *pBc;
206: lequals(__LINE__, Al, (LONG)7L);
207: Al = 14;
208: lequals(__LINE__, Al -= *pBc, (LONG)7L);
209: *pBc = 7; Al = 14;
210: *pBc -= Al;
211: iequals(__LINE__, *pBc, (CHAR)-7);
212: *pBc = 7;
213: iequals(__LINE__, *pBc -= Al, (CHAR)-7);
214: #if ANSI
215: Al = 14; *pBsc = 8;
216: Al -= *pBsc;
217: lequals(__LINE__, Al, (LONG)6L);
218: Al = 14;
219: lequals(__LINE__, Al -= *pBsc, (LONG)6L);
220: *pBsc = 8; Al = 14;
221: *pBsc -= Al;
222: iequals(__LINE__, *pBsc, (SCHAR)-6);
223: *pBsc = 8;
224: iequals(__LINE__, *pBsc -= Al, (SCHAR)-6);
225: #endif
226: Al = 14; *pBs = 9;
227: Al -= *pBs;
228: lequals(__LINE__, Al, (LONG)5L);
229: Al = 14;
230: lequals(__LINE__, Al -= *pBs, (LONG)5L);
231: *pBs = 9; Al = 14;
232: *pBs -= Al;
233: iequals(__LINE__, *pBs, (SHORT)-5);
234: *pBs = 9;
235: iequals(__LINE__, *pBs -= Al, (SHORT)-5);
236: Al = 14; *pBi = 10;
237: Al -= *pBi;
238: lequals(__LINE__, Al, (LONG)4L);
239: Al = 14;
240: lequals(__LINE__, Al -= *pBi, (LONG)4L);
241: *pBi = 10; Al = 14;
242: *pBi -= Al;
243: iequals(__LINE__, *pBi, (INT)-4);
244: *pBi = 10;
245: iequals(__LINE__, *pBi -= Al, (INT)-4);
246: Al = 14; *pBuc = 21;
247: Al -= *pBuc;
248: lequals(__LINE__, Al, (LONG)-7L);
249: Al = 14;
250: lequals(__LINE__, Al -= *pBuc, (LONG)-7L);
251: *pBuc = 21; Al = 14;
252: *pBuc -= Al;
253: iequals(__LINE__, *pBuc, (UCHAR)7);
254: *pBuc = 21;
255: iequals(__LINE__, *pBuc -= Al, (UCHAR)7);
256: Al = 14; *pBus = 22;
257: Al -= *pBus;
258: lequals(__LINE__, Al, (LONG)-8L);
259: Al = 14;
260: lequals(__LINE__, Al -= *pBus, (LONG)-8L);
261: *pBus = 22; Al = 14;
262: *pBus -= Al;
263: iequals(__LINE__, *pBus, (USHORT)8);
264: *pBus = 22;
265: iequals(__LINE__, *pBus -= Al, (USHORT)8);
266: Al = 14; *pBui = 23;
267: Al -= *pBui;
268: lequals(__LINE__, Al, (LONG)-9L);
269: Al = 14;
270: lequals(__LINE__, Al -= *pBui, (LONG)-9L);
271: *pBui = 23; Al = 14;
272: *pBui -= Al;
273: iequals(__LINE__, *pBui, (UINT)9);
274: *pBui = 23;
275: iequals(__LINE__, *pBui -= Al, (UINT)9);
276: Al = 14; *pBl = 14;
277: Al -= *pBl;
278: lequals(__LINE__, Al, (LONG)0L);
279: Al = 14;
280: lequals(__LINE__, Al -= *pBl, (LONG)0L);
281: *pBl = 14; Al = 14;
282: *pBl -= Al;
283: lequals(__LINE__, *pBl, (LONG)0L);
284: *pBl = 14;
285: lequals(__LINE__, *pBl -= Al, (LONG)0L);
286: Al = 14; *pBul = 25;
287: Al -= *pBul;
288: lequals(__LINE__, Al, (LONG)(ULONG)-11L);
289: Al = 14;
290: lequals(__LINE__, Al -= *pBul, (LONG)(ULONG)-11L);
291: *pBul = 25; Al = 14;
292: *pBul -= Al;
293: lequals(__LINE__, *pBul, (ULONG)11L);
294: *pBul = 25;
295: lequals(__LINE__, *pBul -= Al, (ULONG)11L);
296: Al = 14; *pBf = 16;
297: Al -= *pBf;
298: lequals(__LINE__, Al, (LONG)-2L);
299: Al = 14;
300: lequals(__LINE__, Al -= *pBf, (LONG)-2L);
301: *pBf = 16; Al = 14;
302: *pBf -= Al;
303: dequals(__LINE__, *pBf, (FLOAT)2.);
304: *pBf = 16;
305: dequals(__LINE__, *pBf -= Al, (FLOAT)2.);
306: Al = 14; *pBd = 17;
307: Al -= *pBd;
308: lequals(__LINE__, Al, (LONG)-3L);
309: Al = 14;
310: lequals(__LINE__, Al -= *pBd, (LONG)-3L);
311: *pBd = 17; Al = 14;
312: *pBd -= Al;
313: dequals(__LINE__, *pBd, (DOUBLE)3.);
314: *pBd = 17;
315: dequals(__LINE__, *pBd -= Al, (DOUBLE)3.);
316: #if ANSI
317: Al = 14; *pBld = 18;
318: Al -= *pBld;
319: lequals(__LINE__, Al, (LONG)-4L);
320: Al = 14;
321: lequals(__LINE__, Al -= *pBld, (LONG)-4L);
322: *pBld = 18; Al = 14;
323: *pBld -= Al;
324: ldequals(__LINE__, *pBld, (LDOUBLE)4.L);
325: *pBld = 18;
326: ldequals(__LINE__, *pBld -= Al, (LDOUBLE)4.L);
327: #endif
328: Aul = 25; *pBc = 7;
329: Aul -= *pBc;
330: lequals(__LINE__, Aul, (ULONG)18L);
331: Aul = 25;
332: lequals(__LINE__, Aul -= *pBc, (ULONG)18L);
333: *pBc = 7; Aul = 25;
334: *pBc -= Aul;
335: iequals(__LINE__, *pBc, (CHAR)-18);
336: *pBc = 7;
337: iequals(__LINE__, *pBc -= Aul, (CHAR)-18);
338: #if ANSI
339: Aul = 25; *pBsc = 8;
340: Aul -= *pBsc;
341: lequals(__LINE__, Aul, (ULONG)17L);
342: Aul = 25;
343: lequals(__LINE__, Aul -= *pBsc, (ULONG)17L);
344: *pBsc = 8; Aul = 25;
345: *pBsc -= Aul;
346: iequals(__LINE__, *pBsc, (SCHAR)-17);
347: *pBsc = 8;
348: iequals(__LINE__, *pBsc -= Aul, (SCHAR)-17);
349: #endif
350: Aul = 25; *pBs = 9;
351: Aul -= *pBs;
352: lequals(__LINE__, Aul, (ULONG)16L);
353: Aul = 25;
354: lequals(__LINE__, Aul -= *pBs, (ULONG)16L);
355: *pBs = 9; Aul = 25;
356: *pBs -= Aul;
357: iequals(__LINE__, *pBs, (SHORT)(ULONG)-16);
358: *pBs = 9;
359: iequals(__LINE__, *pBs -= Aul, (SHORT)(ULONG)-16);
360: Aul = 25; *pBi = 10;
361: Aul -= *pBi;
362: lequals(__LINE__, Aul, (ULONG)15L);
363: Aul = 25;
364: lequals(__LINE__, Aul -= *pBi, (ULONG)15L);
365: *pBi = 10; Aul = 25;
366: *pBi -= Aul;
367: iequals(__LINE__, *pBi, (INT)(ULONG)-15);
368: *pBi = 10;
369: iequals(__LINE__, *pBi -= Aul, (INT)(ULONG)-15);
370: Aul = 25; *pBuc = 21;
371: Aul -= *pBuc;
372: lequals(__LINE__, Aul, (ULONG)4L);
373: Aul = 25;
374: lequals(__LINE__, Aul -= *pBuc, (ULONG)4L);
375: *pBuc = 21; Aul = 25;
376: *pBuc -= Aul;
377: iequals(__LINE__, *pBuc, (UCHAR)-4);
378: *pBuc = 21;
379: iequals(__LINE__, *pBuc -= Aul, (UCHAR)-4);
380: Aul = 25; *pBus = 22;
381: Aul -= *pBus;
382: lequals(__LINE__, Aul, (ULONG)3L);
383: Aul = 25;
384: lequals(__LINE__, Aul -= *pBus, (ULONG)3L);
385: *pBus = 22; Aul = 25;
386: *pBus -= Aul;
387: iequals(__LINE__, *pBus, (USHORT)-3);
388: *pBus = 22;
389: iequals(__LINE__, *pBus -= Aul, (USHORT)-3);
390: Aul = 25; *pBui = 23;
391: Aul -= *pBui;
392: lequals(__LINE__, Aul, (ULONG)2L);
393: Aul = 25;
394: lequals(__LINE__, Aul -= *pBui, (ULONG)2L);
395: *pBui = 23; Aul = 25;
396: *pBui -= Aul;
397: iequals(__LINE__, *pBui, (UINT)-2);
398: *pBui = 23;
399: iequals(__LINE__, *pBui -= Aul, (UINT)-2);
400: Aul = 25; *pBl = 14;
401: Aul -= *pBl;
402: lequals(__LINE__, Aul, (ULONG)11L);
403: Aul = 25;
404: lequals(__LINE__, Aul -= *pBl, (ULONG)11L);
405: *pBl = 14; Aul = 25;
406: *pBl -= Aul;
407: lequals(__LINE__, *pBl, (LONG)(ULONG)-11L);
408: *pBl = 14;
409: lequals(__LINE__, *pBl -= Aul, (LONG)(ULONG)-11L);
410: Aul = 25; *pBul = 25;
411: Aul -= *pBul;
412: lequals(__LINE__, Aul, (ULONG)0L);
413: Aul = 25;
414: lequals(__LINE__, Aul -= *pBul, (ULONG)0L);
415: *pBul = 25; Aul = 25;
416: *pBul -= Aul;
417: lequals(__LINE__, *pBul, (ULONG)0L);
418: *pBul = 25;
419: lequals(__LINE__, *pBul -= Aul, (ULONG)0L);
420: Aul = 25; *pBf = 16;
421: Aul -= *pBf;
422: lequals(__LINE__, Aul, (ULONG)9L);
423: Aul = 25;
424: lequals(__LINE__, Aul -= *pBf, (ULONG)9L);
425: *pBf = 16; Aul = 25;
426: *pBf -= Aul;
427: dequals(__LINE__, *pBf, (FLOAT)-9.);
428: *pBf = 16;
429: dequals(__LINE__, *pBf -= Aul, (FLOAT)-9.);
430: Aul = 25; *pBd = 17;
431: Aul -= *pBd;
432: lequals(__LINE__, Aul, (ULONG)8L);
433: Aul = 25;
434: lequals(__LINE__, Aul -= *pBd, (ULONG)8L);
435: *pBd = 17; Aul = 25;
436: *pBd -= Aul;
437: dequals(__LINE__, *pBd, (DOUBLE)-8.);
438: *pBd = 17;
439: dequals(__LINE__, *pBd -= Aul, (DOUBLE)-8.);
440: #if ANSI
441: Aul = 25; *pBld = 18;
442: Aul -= *pBld;
443: lequals(__LINE__, Aul, (ULONG)7L);
444: Aul = 25;
445: lequals(__LINE__, Aul -= *pBld, (ULONG)7L);
446: *pBld = 18; Aul = 25;
447: *pBld -= Aul;
448: ldequals(__LINE__, *pBld, (LDOUBLE)-7.L);
449: *pBld = 18;
450: ldequals(__LINE__, *pBld -= Aul, (LDOUBLE)-7.L);
451: #endif
452: Af = 16; *pBc = 7;
453: Af -= *pBc;
454: dequals(__LINE__, Af, (FLOAT)9.);
455: Af = 16;
456: dequals(__LINE__, Af -= *pBc, (FLOAT)9.);
457: *pBc = 7; Af = 16;
458: /* *pBc -= Af; DELETED: NON-PORTABLE */
459: /* iequals(__LINE__, *pBc, (CHAR)-9); DELETED: NON-PORTABLE */
460: *pBc = 7;
461: /* iequals(__LINE__, *pBc -= Af, (CHAR)-9); DELETED: NON-PORTABLE */
462: }}
463: return report(Filename);
464: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.