![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to uminus.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / lcc / ph|
Return to uminus.c CVS log | Up to [Research Unix] / researchv10no / cmd / lcc / ph |
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: #include "o.h"
13: int main()
14: {
15: extern char *Filename;
16: auto struct {
17: CHAR c;
18: SHORT s;
19: INT i;
20: UCHAR uc;
21: USHORT us;
22: UINT ui;
23: LONG l;
24: ULONG ul;
25: FLOAT f;
26: DOUBLE d;
27: #if ANSI
28: SCHAR sc;
29: LDOUBLE ld;
30: #endif
31: } G, *pG = &G;
32: pG->c = 7;
33: #if ANSI
34: pG->sc = 8;
35: #endif
36: pG->s = 9;
37: pG->i = 10;
38: pG->uc = 11;
39: pG->us = 12;
40: pG->ui = 13;
41: pG->l = 14;
42: pG->ul = 15;
43: pG->f = 16;
44: pG->d = 17;
45: #if ANSI
46: pG->ld = 18;
47: #endif
48: {
49: {
50: int true = 1, false = 0;
51: Filename = " auto pstruct1 auto funcrs uminus ";
52: iequals(__LINE__, - pG->c, -7);
53: iequals(__LINE__, - Oc().c, -7);
54: #if ANSI
55: iequals(__LINE__, - pG->c, -7);
56: iequals(__LINE__, - Osc().sc, -8);
57: #endif
58: iequals(__LINE__, - pG->c, -7);
59: iequals(__LINE__, - Os().s, -9);
60: iequals(__LINE__, - pG->c, -7);
61: iequals(__LINE__, - Oi().i, -10);
62: iequals(__LINE__, - pG->c, -7);
63: iequals(__LINE__, - (int)Ouc().uc, -11);
64: iequals(__LINE__, - pG->c, -7);
65: iequals(__LINE__, - (int)Ous().us, -12);
66: iequals(__LINE__, - pG->c, -7);
67: iequals(__LINE__, - (int)Oui().ui, -13);
68: iequals(__LINE__, - pG->c, -7);
69: lequals(__LINE__, - Ol().l, -14L);
70: iequals(__LINE__, - pG->c, -7);
71: lequals(__LINE__, - (long)Oul().ul, -15L);
72: iequals(__LINE__, - pG->c, -7);
73: dequals(__LINE__, - Of().f, -16.);
74: iequals(__LINE__, - pG->c, -7);
75: dequals(__LINE__, - Od().d, -17.);
76: #if ANSI
77: iequals(__LINE__, - pG->c, -7);
78: ldequals(__LINE__, - Old().ld, -18.L);
79: #endif
80: #if ANSI
81: iequals(__LINE__, - pG->sc, -8);
82: iequals(__LINE__, - Oc().c, -7);
83: #endif
84: #if ANSI
85: iequals(__LINE__, - pG->sc, -8);
86: iequals(__LINE__, - Osc().sc, -8);
87: #endif
88: #if ANSI
89: iequals(__LINE__, - pG->sc, -8);
90: iequals(__LINE__, - Os().s, -9);
91: #endif
92: #if ANSI
93: iequals(__LINE__, - pG->sc, -8);
94: iequals(__LINE__, - Oi().i, -10);
95: #endif
96: #if ANSI
97: iequals(__LINE__, - pG->sc, -8);
98: iequals(__LINE__, - (int)Ouc().uc, -11);
99: #endif
100: #if ANSI
101: iequals(__LINE__, - pG->sc, -8);
102: iequals(__LINE__, - (int)Ous().us, -12);
103: #endif
104: #if ANSI
105: iequals(__LINE__, - pG->sc, -8);
106: iequals(__LINE__, - (int)Oui().ui, -13);
107: #endif
108: #if ANSI
109: iequals(__LINE__, - pG->sc, -8);
110: lequals(__LINE__, - Ol().l, -14L);
111: #endif
112: #if ANSI
113: iequals(__LINE__, - pG->sc, -8);
114: lequals(__LINE__, - (long)Oul().ul, -15L);
115: #endif
116: #if ANSI
117: iequals(__LINE__, - pG->sc, -8);
118: dequals(__LINE__, - Of().f, -16.);
119: #endif
120: #if ANSI
121: iequals(__LINE__, - pG->sc, -8);
122: dequals(__LINE__, - Od().d, -17.);
123: #endif
124: #if ANSI
125: iequals(__LINE__, - pG->sc, -8);
126: ldequals(__LINE__, - Old().ld, -18.L);
127: #endif
128: iequals(__LINE__, - pG->s, -9);
129: iequals(__LINE__, - Oc().c, -7);
130: #if ANSI
131: iequals(__LINE__, - pG->s, -9);
132: iequals(__LINE__, - Osc().sc, -8);
133: #endif
134: iequals(__LINE__, - pG->s, -9);
135: iequals(__LINE__, - Os().s, -9);
136: iequals(__LINE__, - pG->s, -9);
137: iequals(__LINE__, - Oi().i, -10);
138: iequals(__LINE__, - pG->s, -9);
139: iequals(__LINE__, - (int)Ouc().uc, -11);
140: iequals(__LINE__, - pG->s, -9);
141: iequals(__LINE__, - (int)Ous().us, -12);
142: iequals(__LINE__, - pG->s, -9);
143: iequals(__LINE__, - (int)Oui().ui, -13);
144: iequals(__LINE__, - pG->s, -9);
145: lequals(__LINE__, - Ol().l, -14L);
146: iequals(__LINE__, - pG->s, -9);
147: lequals(__LINE__, - (long)Oul().ul, -15L);
148: iequals(__LINE__, - pG->s, -9);
149: dequals(__LINE__, - Of().f, -16.);
150: iequals(__LINE__, - pG->s, -9);
151: dequals(__LINE__, - Od().d, -17.);
152: #if ANSI
153: iequals(__LINE__, - pG->s, -9);
154: ldequals(__LINE__, - Old().ld, -18.L);
155: #endif
156: iequals(__LINE__, - pG->i, -10);
157: iequals(__LINE__, - Oc().c, -7);
158: #if ANSI
159: iequals(__LINE__, - pG->i, -10);
160: iequals(__LINE__, - Osc().sc, -8);
161: #endif
162: iequals(__LINE__, - pG->i, -10);
163: iequals(__LINE__, - Os().s, -9);
164: iequals(__LINE__, - pG->i, -10);
165: iequals(__LINE__, - Oi().i, -10);
166: iequals(__LINE__, - pG->i, -10);
167: iequals(__LINE__, - (int)Ouc().uc, -11);
168: iequals(__LINE__, - pG->i, -10);
169: iequals(__LINE__, - (int)Ous().us, -12);
170: iequals(__LINE__, - pG->i, -10);
171: iequals(__LINE__, - (int)Oui().ui, -13);
172: iequals(__LINE__, - pG->i, -10);
173: lequals(__LINE__, - Ol().l, -14L);
174: iequals(__LINE__, - pG->i, -10);
175: lequals(__LINE__, - (long)Oul().ul, -15L);
176: iequals(__LINE__, - pG->i, -10);
177: dequals(__LINE__, - Of().f, -16.);
178: iequals(__LINE__, - pG->i, -10);
179: dequals(__LINE__, - Od().d, -17.);
180: #if ANSI
181: iequals(__LINE__, - pG->i, -10);
182: ldequals(__LINE__, - Old().ld, -18.L);
183: #endif
184: iequals(__LINE__, - (int)pG->uc, -11);
185: iequals(__LINE__, - Oc().c, -7);
186: #if ANSI
187: iequals(__LINE__, - (int)pG->uc, -11);
188: iequals(__LINE__, - Osc().sc, -8);
189: #endif
190: iequals(__LINE__, - (int)pG->uc, -11);
191: iequals(__LINE__, - Os().s, -9);
192: iequals(__LINE__, - (int)pG->uc, -11);
193: iequals(__LINE__, - Oi().i, -10);
194: iequals(__LINE__, - (int)pG->uc, -11);
195: iequals(__LINE__, - (int)Ouc().uc, -11);
196: iequals(__LINE__, - (int)pG->uc, -11);
197: iequals(__LINE__, - (int)Ous().us, -12);
198: iequals(__LINE__, - (int)pG->uc, -11);
199: iequals(__LINE__, - (int)Oui().ui, -13);
200: iequals(__LINE__, - (int)pG->uc, -11);
201: lequals(__LINE__, - Ol().l, -14L);
202: iequals(__LINE__, - (int)pG->uc, -11);
203: lequals(__LINE__, - (long)Oul().ul, -15L);
204: iequals(__LINE__, - (int)pG->uc, -11);
205: dequals(__LINE__, - Of().f, -16.);
206: iequals(__LINE__, - (int)pG->uc, -11);
207: dequals(__LINE__, - Od().d, -17.);
208: #if ANSI
209: iequals(__LINE__, - (int)pG->uc, -11);
210: ldequals(__LINE__, - Old().ld, -18.L);
211: #endif
212: iequals(__LINE__, - (int)pG->us, -12);
213: iequals(__LINE__, - Oc().c, -7);
214: #if ANSI
215: iequals(__LINE__, - (int)pG->us, -12);
216: iequals(__LINE__, - Osc().sc, -8);
217: #endif
218: iequals(__LINE__, - (int)pG->us, -12);
219: iequals(__LINE__, - Os().s, -9);
220: iequals(__LINE__, - (int)pG->us, -12);
221: iequals(__LINE__, - Oi().i, -10);
222: iequals(__LINE__, - (int)pG->us, -12);
223: iequals(__LINE__, - (int)Ouc().uc, -11);
224: iequals(__LINE__, - (int)pG->us, -12);
225: iequals(__LINE__, - (int)Ous().us, -12);
226: iequals(__LINE__, - (int)pG->us, -12);
227: iequals(__LINE__, - (int)Oui().ui, -13);
228: iequals(__LINE__, - (int)pG->us, -12);
229: lequals(__LINE__, - Ol().l, -14L);
230: iequals(__LINE__, - (int)pG->us, -12);
231: lequals(__LINE__, - (long)Oul().ul, -15L);
232: iequals(__LINE__, - (int)pG->us, -12);
233: dequals(__LINE__, - Of().f, -16.);
234: iequals(__LINE__, - (int)pG->us, -12);
235: dequals(__LINE__, - Od().d, -17.);
236: #if ANSI
237: iequals(__LINE__, - (int)pG->us, -12);
238: ldequals(__LINE__, - Old().ld, -18.L);
239: #endif
240: iequals(__LINE__, - (int)pG->ui, -13);
241: iequals(__LINE__, - Oc().c, -7);
242: #if ANSI
243: iequals(__LINE__, - (int)pG->ui, -13);
244: iequals(__LINE__, - Osc().sc, -8);
245: #endif
246: iequals(__LINE__, - (int)pG->ui, -13);
247: iequals(__LINE__, - Os().s, -9);
248: iequals(__LINE__, - (int)pG->ui, -13);
249: iequals(__LINE__, - Oi().i, -10);
250: iequals(__LINE__, - (int)pG->ui, -13);
251: iequals(__LINE__, - (int)Ouc().uc, -11);
252: iequals(__LINE__, - (int)pG->ui, -13);
253: iequals(__LINE__, - (int)Ous().us, -12);
254: iequals(__LINE__, - (int)pG->ui, -13);
255: iequals(__LINE__, - (int)Oui().ui, -13);
256: iequals(__LINE__, - (int)pG->ui, -13);
257: lequals(__LINE__, - Ol().l, -14L);
258: iequals(__LINE__, - (int)pG->ui, -13);
259: lequals(__LINE__, - (long)Oul().ul, -15L);
260: iequals(__LINE__, - (int)pG->ui, -13);
261: dequals(__LINE__, - Of().f, -16.);
262: iequals(__LINE__, - (int)pG->ui, -13);
263: dequals(__LINE__, - Od().d, -17.);
264: #if ANSI
265: iequals(__LINE__, - (int)pG->ui, -13);
266: ldequals(__LINE__, - Old().ld, -18.L);
267: #endif
268: lequals(__LINE__, - pG->l, -14L);
269: iequals(__LINE__, - Oc().c, -7);
270: #if ANSI
271: lequals(__LINE__, - pG->l, -14L);
272: iequals(__LINE__, - Osc().sc, -8);
273: #endif
274: lequals(__LINE__, - pG->l, -14L);
275: iequals(__LINE__, - Os().s, -9);
276: lequals(__LINE__, - pG->l, -14L);
277: iequals(__LINE__, - Oi().i, -10);
278: lequals(__LINE__, - pG->l, -14L);
279: iequals(__LINE__, - (int)Ouc().uc, -11);
280: lequals(__LINE__, - pG->l, -14L);
281: iequals(__LINE__, - (int)Ous().us, -12);
282: lequals(__LINE__, - pG->l, -14L);
283: iequals(__LINE__, - (int)Oui().ui, -13);
284: lequals(__LINE__, - pG->l, -14L);
285: lequals(__LINE__, - Ol().l, -14L);
286: lequals(__LINE__, - pG->l, -14L);
287: lequals(__LINE__, - (long)Oul().ul, -15L);
288: lequals(__LINE__, - pG->l, -14L);
289: dequals(__LINE__, - Of().f, -16.);
290: lequals(__LINE__, - pG->l, -14L);
291: dequals(__LINE__, - Od().d, -17.);
292: #if ANSI
293: lequals(__LINE__, - pG->l, -14L);
294: ldequals(__LINE__, - Old().ld, -18.L);
295: #endif
296: lequals(__LINE__, - (long)pG->ul, -15L);
297: iequals(__LINE__, - Oc().c, -7);
298: #if ANSI
299: lequals(__LINE__, - (long)pG->ul, -15L);
300: iequals(__LINE__, - Osc().sc, -8);
301: #endif
302: lequals(__LINE__, - (long)pG->ul, -15L);
303: iequals(__LINE__, - Os().s, -9);
304: lequals(__LINE__, - (long)pG->ul, -15L);
305: iequals(__LINE__, - Oi().i, -10);
306: lequals(__LINE__, - (long)pG->ul, -15L);
307: iequals(__LINE__, - (int)Ouc().uc, -11);
308: lequals(__LINE__, - (long)pG->ul, -15L);
309: iequals(__LINE__, - (int)Ous().us, -12);
310: lequals(__LINE__, - (long)pG->ul, -15L);
311: iequals(__LINE__, - (int)Oui().ui, -13);
312: lequals(__LINE__, - (long)pG->ul, -15L);
313: lequals(__LINE__, - Ol().l, -14L);
314: lequals(__LINE__, - (long)pG->ul, -15L);
315: lequals(__LINE__, - (long)Oul().ul, -15L);
316: lequals(__LINE__, - (long)pG->ul, -15L);
317: dequals(__LINE__, - Of().f, -16.);
318: lequals(__LINE__, - (long)pG->ul, -15L);
319: dequals(__LINE__, - Od().d, -17.);
320: #if ANSI
321: lequals(__LINE__, - (long)pG->ul, -15L);
322: ldequals(__LINE__, - Old().ld, -18.L);
323: #endif
324: dequals(__LINE__, - pG->f, -16.);
325: iequals(__LINE__, - Oc().c, -7);
326: #if ANSI
327: dequals(__LINE__, - pG->f, -16.);
328: iequals(__LINE__, - Osc().sc, -8);
329: #endif
330: dequals(__LINE__, - pG->f, -16.);
331: iequals(__LINE__, - Os().s, -9);
332: dequals(__LINE__, - pG->f, -16.);
333: iequals(__LINE__, - Oi().i, -10);
334: dequals(__LINE__, - pG->f, -16.);
335: iequals(__LINE__, - (int)Ouc().uc, -11);
336: dequals(__LINE__, - pG->f, -16.);
337: iequals(__LINE__, - (int)Ous().us, -12);
338: dequals(__LINE__, - pG->f, -16.);
339: iequals(__LINE__, - (int)Oui().ui, -13);
340: dequals(__LINE__, - pG->f, -16.);
341: lequals(__LINE__, - Ol().l, -14L);
342: dequals(__LINE__, - pG->f, -16.);
343: lequals(__LINE__, - (long)Oul().ul, -15L);
344: dequals(__LINE__, - pG->f, -16.);
345: dequals(__LINE__, - Of().f, -16.);
346: dequals(__LINE__, - pG->f, -16.);
347: dequals(__LINE__, - Od().d, -17.);
348: #if ANSI
349: dequals(__LINE__, - pG->f, -16.);
350: ldequals(__LINE__, - Old().ld, -18.L);
351: #endif
352: dequals(__LINE__, - pG->d, -17.);
353: iequals(__LINE__, - Oc().c, -7);
354: #if ANSI
355: dequals(__LINE__, - pG->d, -17.);
356: iequals(__LINE__, - Osc().sc, -8);
357: #endif
358: dequals(__LINE__, - pG->d, -17.);
359: iequals(__LINE__, - Os().s, -9);
360: dequals(__LINE__, - pG->d, -17.);
361: iequals(__LINE__, - Oi().i, -10);
362: dequals(__LINE__, - pG->d, -17.);
363: iequals(__LINE__, - (int)Ouc().uc, -11);
364: dequals(__LINE__, - pG->d, -17.);
365: iequals(__LINE__, - (int)Ous().us, -12);
366: dequals(__LINE__, - pG->d, -17.);
367: iequals(__LINE__, - (int)Oui().ui, -13);
368: dequals(__LINE__, - pG->d, -17.);
369: lequals(__LINE__, - Ol().l, -14L);
370: dequals(__LINE__, - pG->d, -17.);
371: lequals(__LINE__, - (long)Oul().ul, -15L);
372: dequals(__LINE__, - pG->d, -17.);
373: dequals(__LINE__, - Of().f, -16.);
374: dequals(__LINE__, - pG->d, -17.);
375: dequals(__LINE__, - Od().d, -17.);
376: #if ANSI
377: dequals(__LINE__, - pG->d, -17.);
378: ldequals(__LINE__, - Old().ld, -18.L);
379: #endif
380: #if ANSI
381: ldequals(__LINE__, - pG->ld, -18.L);
382: iequals(__LINE__, - Oc().c, -7);
383: #endif
384: #if ANSI
385: ldequals(__LINE__, - pG->ld, -18.L);
386: iequals(__LINE__, - Osc().sc, -8);
387: #endif
388: #if ANSI
389: ldequals(__LINE__, - pG->ld, -18.L);
390: iequals(__LINE__, - Os().s, -9);
391: #endif
392: #if ANSI
393: ldequals(__LINE__, - pG->ld, -18.L);
394: iequals(__LINE__, - Oi().i, -10);
395: #endif
396: #if ANSI
397: ldequals(__LINE__, - pG->ld, -18.L);
398: iequals(__LINE__, - (int)Ouc().uc, -11);
399: #endif
400: #if ANSI
401: ldequals(__LINE__, - pG->ld, -18.L);
402: iequals(__LINE__, - (int)Ous().us, -12);
403: #endif
404: #if ANSI
405: ldequals(__LINE__, - pG->ld, -18.L);
406: iequals(__LINE__, - (int)Oui().ui, -13);
407: #endif
408: #if ANSI
409: ldequals(__LINE__, - pG->ld, -18.L);
410: lequals(__LINE__, - Ol().l, -14L);
411: #endif
412: #if ANSI
413: ldequals(__LINE__, - pG->ld, -18.L);
414: lequals(__LINE__, - (long)Oul().ul, -15L);
415: #endif
416: #if ANSI
417: ldequals(__LINE__, - pG->ld, -18.L);
418: dequals(__LINE__, - Of().f, -16.);
419: #endif
420: #if ANSI
421: ldequals(__LINE__, - pG->ld, -18.L);
422: dequals(__LINE__, - Od().d, -17.);
423: #endif
424: #if ANSI
425: ldequals(__LINE__, - pG->ld, -18.L);
426: ldequals(__LINE__, - Old().ld, -18.L);
427: #endif
428: }}
429: return report(Filename);
430: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.