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