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