![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to eq.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 eq.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: int main()
13: {
14: extern char *Filename;
15: auto CHAR Bc = 7;
16: auto CHAR *pBc = &Bc;
17: #if ANSI
18: auto SCHAR Bsc = 8;
19: auto SCHAR *pBsc = &Bsc;
20: #endif
21: auto SHORT Bs = 9;
22: auto SHORT *pBs = &Bs;
23: auto INT Bi = 10;
24: auto INT *pBi = &Bi;
25: auto UCHAR Buc = 11;
26: auto UCHAR *pBuc = &Buc;
27: auto USHORT Bus = 12;
28: auto USHORT *pBus = &Bus;
29: auto UINT Bui = 13;
30: auto UINT *pBui = &Bui;
31: auto LONG Bl = 14;
32: auto LONG *pBl = &Bl;
33: auto ULONG Bul = 15;
34: auto ULONG *pBul = &Bul;
35: auto FLOAT Bf = 16;
36: auto FLOAT *pBf = &Bf;
37: auto DOUBLE Bd = 17;
38: auto DOUBLE *pBd = &Bd;
39: #if ANSI
40: auto LDOUBLE Bld = 18;
41: auto LDOUBLE *pBld = &Bld;
42: #endif
43: {
44: auto CHAR Ic[12];
45: int x_0 = 0;
46: #if ANSI
47: auto SCHAR Isc[12];
48: int x_1 = 1;
49: #endif
50: auto SHORT Is[12];
51: int x_2 = 2;
52: auto INT Ii[12];
53: int x_3 = 3;
54: auto UCHAR Iuc[12];
55: int x_4 = 4;
56: auto USHORT Ius[12];
57: int x_5 = 5;
58: auto UINT Iui[12];
59: int x_6 = 6;
60: auto LONG Il[12];
61: int x_7 = 7;
62: auto ULONG Iul[12];
63: int x_8 = 8;
64: auto FLOAT If[12];
65: int x_9 = 9;
66: auto DOUBLE Id[12];
67: int x_10 = 10;
68: #if ANSI
69: auto LDOUBLE Ild[12];
70: int x_11 = 11;
71: #endif
72: Ic[x_0] = 7;
73: #if ANSI
74: Isc[x_1] = 8;
75: #endif
76: Is[x_2] = 9;
77: Ii[x_3] = 10;
78: Iuc[x_4] = 11;
79: Ius[x_5] = 12;
80: Iui[x_6] = 13;
81: Il[x_7] = 14;
82: Iul[x_8] = 15;
83: If[x_9] = 16;
84: Id[x_10] = 17;
85: #if ANSI
86: Ild[x_11] = 18;
87: #endif
88: {
89: int true = 1, false = 0;
90: Filename = " auto pscalar1 auto array1 eq ";
91: iequals(__LINE__, *pBc == Ic[x_0], 1);
92: iequals(__LINE__, Ic[x_0] == *pBc, 1);
93: if (*pBc == Ic[x_0]); else complain(__LINE__);
94: if (Ic[x_0] == *pBc); else complain(__LINE__);
95: #if ANSI
96: iequals(__LINE__, *pBc == Isc[x_1], 0);
97: iequals(__LINE__, Isc[x_1] == *pBc, 0);
98: if (*pBc == Isc[x_1]) complain(__LINE__);
99: if (Isc[x_1] == *pBc) complain(__LINE__);
100: #endif
101: iequals(__LINE__, *pBc == Is[x_2], 0);
102: iequals(__LINE__, Is[x_2] == *pBc, 0);
103: if (*pBc == Is[x_2]) complain(__LINE__);
104: if (Is[x_2] == *pBc) complain(__LINE__);
105: iequals(__LINE__, *pBc == Ii[x_3], 0);
106: iequals(__LINE__, Ii[x_3] == *pBc, 0);
107: if (*pBc == Ii[x_3]) complain(__LINE__);
108: if (Ii[x_3] == *pBc) complain(__LINE__);
109: iequals(__LINE__, *pBc == Iuc[x_4], 0);
110: iequals(__LINE__, Iuc[x_4] == *pBc, 0);
111: if (*pBc == Iuc[x_4]) complain(__LINE__);
112: if (Iuc[x_4] == *pBc) complain(__LINE__);
113: iequals(__LINE__, *pBc == Ius[x_5], 0);
114: iequals(__LINE__, Ius[x_5] == *pBc, 0);
115: if (*pBc == Ius[x_5]) complain(__LINE__);
116: if (Ius[x_5] == *pBc) complain(__LINE__);
117: iequals(__LINE__, *pBc == Iui[x_6], 0);
118: iequals(__LINE__, Iui[x_6] == *pBc, 0);
119: if (*pBc == Iui[x_6]) complain(__LINE__);
120: if (Iui[x_6] == *pBc) complain(__LINE__);
121: iequals(__LINE__, *pBc == Il[x_7], 0);
122: iequals(__LINE__, Il[x_7] == *pBc, 0);
123: if (*pBc == Il[x_7]) complain(__LINE__);
124: if (Il[x_7] == *pBc) complain(__LINE__);
125: iequals(__LINE__, *pBc == Iul[x_8], 0);
126: iequals(__LINE__, Iul[x_8] == *pBc, 0);
127: if (*pBc == Iul[x_8]) complain(__LINE__);
128: if (Iul[x_8] == *pBc) complain(__LINE__);
129: iequals(__LINE__, *pBc == If[x_9], 0);
130: iequals(__LINE__, If[x_9] == *pBc, 0);
131: if (*pBc == If[x_9]) complain(__LINE__);
132: if (If[x_9] == *pBc) complain(__LINE__);
133: iequals(__LINE__, *pBc == Id[x_10], 0);
134: iequals(__LINE__, Id[x_10] == *pBc, 0);
135: if (*pBc == Id[x_10]) complain(__LINE__);
136: if (Id[x_10] == *pBc) complain(__LINE__);
137: #if ANSI
138: iequals(__LINE__, *pBc == Ild[x_11], 0);
139: iequals(__LINE__, Ild[x_11] == *pBc, 0);
140: if (*pBc == Ild[x_11]) complain(__LINE__);
141: if (Ild[x_11] == *pBc) complain(__LINE__);
142: #endif
143: #if ANSI
144: iequals(__LINE__, *pBsc == Ic[x_0], 0);
145: iequals(__LINE__, Ic[x_0] == *pBsc, 0);
146: if (*pBsc == Ic[x_0]) complain(__LINE__);
147: if (Ic[x_0] == *pBsc) complain(__LINE__);
148: #endif
149: #if ANSI
150: iequals(__LINE__, *pBsc == Isc[x_1], 1);
151: iequals(__LINE__, Isc[x_1] == *pBsc, 1);
152: if (*pBsc == Isc[x_1]); else complain(__LINE__);
153: if (Isc[x_1] == *pBsc); else complain(__LINE__);
154: #endif
155: #if ANSI
156: iequals(__LINE__, *pBsc == Is[x_2], 0);
157: iequals(__LINE__, Is[x_2] == *pBsc, 0);
158: if (*pBsc == Is[x_2]) complain(__LINE__);
159: if (Is[x_2] == *pBsc) complain(__LINE__);
160: #endif
161: #if ANSI
162: iequals(__LINE__, *pBsc == Ii[x_3], 0);
163: iequals(__LINE__, Ii[x_3] == *pBsc, 0);
164: if (*pBsc == Ii[x_3]) complain(__LINE__);
165: if (Ii[x_3] == *pBsc) complain(__LINE__);
166: #endif
167: #if ANSI
168: iequals(__LINE__, *pBsc == Iuc[x_4], 0);
169: iequals(__LINE__, Iuc[x_4] == *pBsc, 0);
170: if (*pBsc == Iuc[x_4]) complain(__LINE__);
171: if (Iuc[x_4] == *pBsc) complain(__LINE__);
172: #endif
173: #if ANSI
174: iequals(__LINE__, *pBsc == Ius[x_5], 0);
175: iequals(__LINE__, Ius[x_5] == *pBsc, 0);
176: if (*pBsc == Ius[x_5]) complain(__LINE__);
177: if (Ius[x_5] == *pBsc) complain(__LINE__);
178: #endif
179: #if ANSI
180: iequals(__LINE__, *pBsc == Iui[x_6], 0);
181: iequals(__LINE__, Iui[x_6] == *pBsc, 0);
182: if (*pBsc == Iui[x_6]) complain(__LINE__);
183: if (Iui[x_6] == *pBsc) complain(__LINE__);
184: #endif
185: #if ANSI
186: iequals(__LINE__, *pBsc == Il[x_7], 0);
187: iequals(__LINE__, Il[x_7] == *pBsc, 0);
188: if (*pBsc == Il[x_7]) complain(__LINE__);
189: if (Il[x_7] == *pBsc) complain(__LINE__);
190: #endif
191: #if ANSI
192: iequals(__LINE__, *pBsc == Iul[x_8], 0);
193: iequals(__LINE__, Iul[x_8] == *pBsc, 0);
194: if (*pBsc == Iul[x_8]) complain(__LINE__);
195: if (Iul[x_8] == *pBsc) complain(__LINE__);
196: #endif
197: #if ANSI
198: iequals(__LINE__, *pBsc == If[x_9], 0);
199: iequals(__LINE__, If[x_9] == *pBsc, 0);
200: if (*pBsc == If[x_9]) complain(__LINE__);
201: if (If[x_9] == *pBsc) complain(__LINE__);
202: #endif
203: #if ANSI
204: iequals(__LINE__, *pBsc == Id[x_10], 0);
205: iequals(__LINE__, Id[x_10] == *pBsc, 0);
206: if (*pBsc == Id[x_10]) complain(__LINE__);
207: if (Id[x_10] == *pBsc) complain(__LINE__);
208: #endif
209: #if ANSI
210: iequals(__LINE__, *pBsc == Ild[x_11], 0);
211: iequals(__LINE__, Ild[x_11] == *pBsc, 0);
212: if (*pBsc == Ild[x_11]) complain(__LINE__);
213: if (Ild[x_11] == *pBsc) complain(__LINE__);
214: #endif
215: iequals(__LINE__, *pBs == Ic[x_0], 0);
216: iequals(__LINE__, Ic[x_0] == *pBs, 0);
217: if (*pBs == Ic[x_0]) complain(__LINE__);
218: if (Ic[x_0] == *pBs) complain(__LINE__);
219: #if ANSI
220: iequals(__LINE__, *pBs == Isc[x_1], 0);
221: iequals(__LINE__, Isc[x_1] == *pBs, 0);
222: if (*pBs == Isc[x_1]) complain(__LINE__);
223: if (Isc[x_1] == *pBs) complain(__LINE__);
224: #endif
225: iequals(__LINE__, *pBs == Is[x_2], 1);
226: iequals(__LINE__, Is[x_2] == *pBs, 1);
227: if (*pBs == Is[x_2]); else complain(__LINE__);
228: if (Is[x_2] == *pBs); else complain(__LINE__);
229: iequals(__LINE__, *pBs == Ii[x_3], 0);
230: iequals(__LINE__, Ii[x_3] == *pBs, 0);
231: if (*pBs == Ii[x_3]) complain(__LINE__);
232: if (Ii[x_3] == *pBs) complain(__LINE__);
233: iequals(__LINE__, *pBs == Iuc[x_4], 0);
234: iequals(__LINE__, Iuc[x_4] == *pBs, 0);
235: if (*pBs == Iuc[x_4]) complain(__LINE__);
236: if (Iuc[x_4] == *pBs) complain(__LINE__);
237: iequals(__LINE__, *pBs == Ius[x_5], 0);
238: iequals(__LINE__, Ius[x_5] == *pBs, 0);
239: if (*pBs == Ius[x_5]) complain(__LINE__);
240: if (Ius[x_5] == *pBs) complain(__LINE__);
241: iequals(__LINE__, *pBs == Iui[x_6], 0);
242: iequals(__LINE__, Iui[x_6] == *pBs, 0);
243: if (*pBs == Iui[x_6]) complain(__LINE__);
244: if (Iui[x_6] == *pBs) complain(__LINE__);
245: iequals(__LINE__, *pBs == Il[x_7], 0);
246: iequals(__LINE__, Il[x_7] == *pBs, 0);
247: if (*pBs == Il[x_7]) complain(__LINE__);
248: if (Il[x_7] == *pBs) complain(__LINE__);
249: iequals(__LINE__, *pBs == Iul[x_8], 0);
250: iequals(__LINE__, Iul[x_8] == *pBs, 0);
251: if (*pBs == Iul[x_8]) complain(__LINE__);
252: if (Iul[x_8] == *pBs) complain(__LINE__);
253: iequals(__LINE__, *pBs == If[x_9], 0);
254: iequals(__LINE__, If[x_9] == *pBs, 0);
255: if (*pBs == If[x_9]) complain(__LINE__);
256: if (If[x_9] == *pBs) complain(__LINE__);
257: iequals(__LINE__, *pBs == Id[x_10], 0);
258: iequals(__LINE__, Id[x_10] == *pBs, 0);
259: if (*pBs == Id[x_10]) complain(__LINE__);
260: if (Id[x_10] == *pBs) complain(__LINE__);
261: #if ANSI
262: iequals(__LINE__, *pBs == Ild[x_11], 0);
263: iequals(__LINE__, Ild[x_11] == *pBs, 0);
264: if (*pBs == Ild[x_11]) complain(__LINE__);
265: if (Ild[x_11] == *pBs) complain(__LINE__);
266: #endif
267: iequals(__LINE__, *pBi == Ic[x_0], 0);
268: iequals(__LINE__, Ic[x_0] == *pBi, 0);
269: if (*pBi == Ic[x_0]) complain(__LINE__);
270: if (Ic[x_0] == *pBi) complain(__LINE__);
271: #if ANSI
272: iequals(__LINE__, *pBi == Isc[x_1], 0);
273: iequals(__LINE__, Isc[x_1] == *pBi, 0);
274: if (*pBi == Isc[x_1]) complain(__LINE__);
275: if (Isc[x_1] == *pBi) complain(__LINE__);
276: #endif
277: iequals(__LINE__, *pBi == Is[x_2], 0);
278: iequals(__LINE__, Is[x_2] == *pBi, 0);
279: if (*pBi == Is[x_2]) complain(__LINE__);
280: if (Is[x_2] == *pBi) complain(__LINE__);
281: iequals(__LINE__, *pBi == Ii[x_3], 1);
282: iequals(__LINE__, Ii[x_3] == *pBi, 1);
283: if (*pBi == Ii[x_3]); else complain(__LINE__);
284: if (Ii[x_3] == *pBi); else complain(__LINE__);
285: iequals(__LINE__, *pBi == Iuc[x_4], 0);
286: iequals(__LINE__, Iuc[x_4] == *pBi, 0);
287: if (*pBi == Iuc[x_4]) complain(__LINE__);
288: if (Iuc[x_4] == *pBi) complain(__LINE__);
289: iequals(__LINE__, *pBi == Ius[x_5], 0);
290: iequals(__LINE__, Ius[x_5] == *pBi, 0);
291: if (*pBi == Ius[x_5]) complain(__LINE__);
292: if (Ius[x_5] == *pBi) complain(__LINE__);
293: iequals(__LINE__, *pBi == Iui[x_6], 0);
294: iequals(__LINE__, Iui[x_6] == *pBi, 0);
295: if (*pBi == Iui[x_6]) complain(__LINE__);
296: if (Iui[x_6] == *pBi) complain(__LINE__);
297: iequals(__LINE__, *pBi == Il[x_7], 0);
298: iequals(__LINE__, Il[x_7] == *pBi, 0);
299: if (*pBi == Il[x_7]) complain(__LINE__);
300: if (Il[x_7] == *pBi) complain(__LINE__);
301: iequals(__LINE__, *pBi == Iul[x_8], 0);
302: iequals(__LINE__, Iul[x_8] == *pBi, 0);
303: if (*pBi == Iul[x_8]) complain(__LINE__);
304: if (Iul[x_8] == *pBi) complain(__LINE__);
305: iequals(__LINE__, *pBi == If[x_9], 0);
306: iequals(__LINE__, If[x_9] == *pBi, 0);
307: if (*pBi == If[x_9]) complain(__LINE__);
308: if (If[x_9] == *pBi) complain(__LINE__);
309: iequals(__LINE__, *pBi == Id[x_10], 0);
310: iequals(__LINE__, Id[x_10] == *pBi, 0);
311: if (*pBi == Id[x_10]) complain(__LINE__);
312: if (Id[x_10] == *pBi) complain(__LINE__);
313: #if ANSI
314: iequals(__LINE__, *pBi == Ild[x_11], 0);
315: iequals(__LINE__, Ild[x_11] == *pBi, 0);
316: if (*pBi == Ild[x_11]) complain(__LINE__);
317: if (Ild[x_11] == *pBi) complain(__LINE__);
318: #endif
319: iequals(__LINE__, *pBuc == Ic[x_0], 0);
320: iequals(__LINE__, Ic[x_0] == *pBuc, 0);
321: if (*pBuc == Ic[x_0]) complain(__LINE__);
322: if (Ic[x_0] == *pBuc) complain(__LINE__);
323: #if ANSI
324: iequals(__LINE__, *pBuc == Isc[x_1], 0);
325: iequals(__LINE__, Isc[x_1] == *pBuc, 0);
326: if (*pBuc == Isc[x_1]) complain(__LINE__);
327: if (Isc[x_1] == *pBuc) complain(__LINE__);
328: #endif
329: iequals(__LINE__, *pBuc == Is[x_2], 0);
330: iequals(__LINE__, Is[x_2] == *pBuc, 0);
331: if (*pBuc == Is[x_2]) complain(__LINE__);
332: if (Is[x_2] == *pBuc) complain(__LINE__);
333: iequals(__LINE__, *pBuc == Ii[x_3], 0);
334: iequals(__LINE__, Ii[x_3] == *pBuc, 0);
335: if (*pBuc == Ii[x_3]) complain(__LINE__);
336: if (Ii[x_3] == *pBuc) complain(__LINE__);
337: iequals(__LINE__, *pBuc == Iuc[x_4], 1);
338: iequals(__LINE__, Iuc[x_4] == *pBuc, 1);
339: if (*pBuc == Iuc[x_4]); else complain(__LINE__);
340: if (Iuc[x_4] == *pBuc); else complain(__LINE__);
341: iequals(__LINE__, *pBuc == Ius[x_5], 0);
342: iequals(__LINE__, Ius[x_5] == *pBuc, 0);
343: if (*pBuc == Ius[x_5]) complain(__LINE__);
344: if (Ius[x_5] == *pBuc) complain(__LINE__);
345: iequals(__LINE__, *pBuc == Iui[x_6], 0);
346: iequals(__LINE__, Iui[x_6] == *pBuc, 0);
347: if (*pBuc == Iui[x_6]) complain(__LINE__);
348: if (Iui[x_6] == *pBuc) complain(__LINE__);
349: iequals(__LINE__, *pBuc == Il[x_7], 0);
350: iequals(__LINE__, Il[x_7] == *pBuc, 0);
351: if (*pBuc == Il[x_7]) complain(__LINE__);
352: if (Il[x_7] == *pBuc) complain(__LINE__);
353: iequals(__LINE__, *pBuc == Iul[x_8], 0);
354: iequals(__LINE__, Iul[x_8] == *pBuc, 0);
355: if (*pBuc == Iul[x_8]) complain(__LINE__);
356: if (Iul[x_8] == *pBuc) complain(__LINE__);
357: iequals(__LINE__, *pBuc == If[x_9], 0);
358: iequals(__LINE__, If[x_9] == *pBuc, 0);
359: if (*pBuc == If[x_9]) complain(__LINE__);
360: if (If[x_9] == *pBuc) complain(__LINE__);
361: iequals(__LINE__, *pBuc == Id[x_10], 0);
362: iequals(__LINE__, Id[x_10] == *pBuc, 0);
363: if (*pBuc == Id[x_10]) complain(__LINE__);
364: if (Id[x_10] == *pBuc) complain(__LINE__);
365: #if ANSI
366: iequals(__LINE__, *pBuc == Ild[x_11], 0);
367: iequals(__LINE__, Ild[x_11] == *pBuc, 0);
368: if (*pBuc == Ild[x_11]) complain(__LINE__);
369: if (Ild[x_11] == *pBuc) complain(__LINE__);
370: #endif
371: iequals(__LINE__, *pBus == Ic[x_0], 0);
372: iequals(__LINE__, Ic[x_0] == *pBus, 0);
373: if (*pBus == Ic[x_0]) complain(__LINE__);
374: if (Ic[x_0] == *pBus) complain(__LINE__);
375: #if ANSI
376: iequals(__LINE__, *pBus == Isc[x_1], 0);
377: iequals(__LINE__, Isc[x_1] == *pBus, 0);
378: if (*pBus == Isc[x_1]) complain(__LINE__);
379: if (Isc[x_1] == *pBus) complain(__LINE__);
380: #endif
381: iequals(__LINE__, *pBus == Is[x_2], 0);
382: iequals(__LINE__, Is[x_2] == *pBus, 0);
383: if (*pBus == Is[x_2]) complain(__LINE__);
384: if (Is[x_2] == *pBus) complain(__LINE__);
385: iequals(__LINE__, *pBus == Ii[x_3], 0);
386: iequals(__LINE__, Ii[x_3] == *pBus, 0);
387: if (*pBus == Ii[x_3]) complain(__LINE__);
388: if (Ii[x_3] == *pBus) complain(__LINE__);
389: iequals(__LINE__, *pBus == Iuc[x_4], 0);
390: iequals(__LINE__, Iuc[x_4] == *pBus, 0);
391: if (*pBus == Iuc[x_4]) complain(__LINE__);
392: if (Iuc[x_4] == *pBus) complain(__LINE__);
393: iequals(__LINE__, *pBus == Ius[x_5], 1);
394: iequals(__LINE__, Ius[x_5] == *pBus, 1);
395: if (*pBus == Ius[x_5]); else complain(__LINE__);
396: if (Ius[x_5] == *pBus); else complain(__LINE__);
397: iequals(__LINE__, *pBus == Iui[x_6], 0);
398: iequals(__LINE__, Iui[x_6] == *pBus, 0);
399: if (*pBus == Iui[x_6]) complain(__LINE__);
400: if (Iui[x_6] == *pBus) complain(__LINE__);
401: iequals(__LINE__, *pBus == Il[x_7], 0);
402: iequals(__LINE__, Il[x_7] == *pBus, 0);
403: if (*pBus == Il[x_7]) complain(__LINE__);
404: if (Il[x_7] == *pBus) complain(__LINE__);
405: iequals(__LINE__, *pBus == Iul[x_8], 0);
406: iequals(__LINE__, Iul[x_8] == *pBus, 0);
407: if (*pBus == Iul[x_8]) complain(__LINE__);
408: if (Iul[x_8] == *pBus) complain(__LINE__);
409: iequals(__LINE__, *pBus == If[x_9], 0);
410: iequals(__LINE__, If[x_9] == *pBus, 0);
411: if (*pBus == If[x_9]) complain(__LINE__);
412: if (If[x_9] == *pBus) complain(__LINE__);
413: iequals(__LINE__, *pBus == Id[x_10], 0);
414: iequals(__LINE__, Id[x_10] == *pBus, 0);
415: if (*pBus == Id[x_10]) complain(__LINE__);
416: if (Id[x_10] == *pBus) complain(__LINE__);
417: #if ANSI
418: iequals(__LINE__, *pBus == Ild[x_11], 0);
419: iequals(__LINE__, Ild[x_11] == *pBus, 0);
420: if (*pBus == Ild[x_11]) complain(__LINE__);
421: if (Ild[x_11] == *pBus) complain(__LINE__);
422: #endif
423: iequals(__LINE__, *pBui == Ic[x_0], 0);
424: iequals(__LINE__, Ic[x_0] == *pBui, 0);
425: if (*pBui == Ic[x_0]) complain(__LINE__);
426: if (Ic[x_0] == *pBui) complain(__LINE__);
427: #if ANSI
428: iequals(__LINE__, *pBui == Isc[x_1], 0);
429: iequals(__LINE__, Isc[x_1] == *pBui, 0);
430: if (*pBui == Isc[x_1]) complain(__LINE__);
431: if (Isc[x_1] == *pBui) complain(__LINE__);
432: #endif
433: iequals(__LINE__, *pBui == Is[x_2], 0);
434: iequals(__LINE__, Is[x_2] == *pBui, 0);
435: if (*pBui == Is[x_2]) complain(__LINE__);
436: if (Is[x_2] == *pBui) complain(__LINE__);
437: iequals(__LINE__, *pBui == Ii[x_3], 0);
438: iequals(__LINE__, Ii[x_3] == *pBui, 0);
439: if (*pBui == Ii[x_3]) complain(__LINE__);
440: if (Ii[x_3] == *pBui) complain(__LINE__);
441: iequals(__LINE__, *pBui == Iuc[x_4], 0);
442: iequals(__LINE__, Iuc[x_4] == *pBui, 0);
443: if (*pBui == Iuc[x_4]) complain(__LINE__);
444: if (Iuc[x_4] == *pBui) complain(__LINE__);
445: iequals(__LINE__, *pBui == Ius[x_5], 0);
446: iequals(__LINE__, Ius[x_5] == *pBui, 0);
447: if (*pBui == Ius[x_5]) complain(__LINE__);
448: if (Ius[x_5] == *pBui) complain(__LINE__);
449: iequals(__LINE__, *pBui == Iui[x_6], 1);
450: iequals(__LINE__, Iui[x_6] == *pBui, 1);
451: if (*pBui == Iui[x_6]); else complain(__LINE__);
452: if (Iui[x_6] == *pBui); else complain(__LINE__);
453: iequals(__LINE__, *pBui == Il[x_7], 0);
454: iequals(__LINE__, Il[x_7] == *pBui, 0);
455: if (*pBui == Il[x_7]) complain(__LINE__);
456: if (Il[x_7] == *pBui) complain(__LINE__);
457: iequals(__LINE__, *pBui == Iul[x_8], 0);
458: iequals(__LINE__, Iul[x_8] == *pBui, 0);
459: if (*pBui == Iul[x_8]) complain(__LINE__);
460: if (Iul[x_8] == *pBui) complain(__LINE__);
461: iequals(__LINE__, *pBui == If[x_9], 0);
462: iequals(__LINE__, If[x_9] == *pBui, 0);
463: if (*pBui == If[x_9]) complain(__LINE__);
464: if (If[x_9] == *pBui) complain(__LINE__);
465: iequals(__LINE__, *pBui == Id[x_10], 0);
466: iequals(__LINE__, Id[x_10] == *pBui, 0);
467: if (*pBui == Id[x_10]) complain(__LINE__);
468: if (Id[x_10] == *pBui) complain(__LINE__);
469: #if ANSI
470: iequals(__LINE__, *pBui == Ild[x_11], 0);
471: iequals(__LINE__, Ild[x_11] == *pBui, 0);
472: if (*pBui == Ild[x_11]) complain(__LINE__);
473: if (Ild[x_11] == *pBui) complain(__LINE__);
474: #endif
475: iequals(__LINE__, *pBl == Ic[x_0], 0);
476: iequals(__LINE__, Ic[x_0] == *pBl, 0);
477: if (*pBl == Ic[x_0]) complain(__LINE__);
478: if (Ic[x_0] == *pBl) complain(__LINE__);
479: #if ANSI
480: iequals(__LINE__, *pBl == Isc[x_1], 0);
481: iequals(__LINE__, Isc[x_1] == *pBl, 0);
482: if (*pBl == Isc[x_1]) complain(__LINE__);
483: if (Isc[x_1] == *pBl) complain(__LINE__);
484: #endif
485: iequals(__LINE__, *pBl == Is[x_2], 0);
486: iequals(__LINE__, Is[x_2] == *pBl, 0);
487: if (*pBl == Is[x_2]) complain(__LINE__);
488: if (Is[x_2] == *pBl) complain(__LINE__);
489: iequals(__LINE__, *pBl == Ii[x_3], 0);
490: iequals(__LINE__, Ii[x_3] == *pBl, 0);
491: if (*pBl == Ii[x_3]) complain(__LINE__);
492: if (Ii[x_3] == *pBl) complain(__LINE__);
493: iequals(__LINE__, *pBl == Iuc[x_4], 0);
494: iequals(__LINE__, Iuc[x_4] == *pBl, 0);
495: if (*pBl == Iuc[x_4]) complain(__LINE__);
496: if (Iuc[x_4] == *pBl) complain(__LINE__);
497: iequals(__LINE__, *pBl == Ius[x_5], 0);
498: iequals(__LINE__, Ius[x_5] == *pBl, 0);
499: if (*pBl == Ius[x_5]) complain(__LINE__);
500: if (Ius[x_5] == *pBl) complain(__LINE__);
501: iequals(__LINE__, *pBl == Iui[x_6], 0);
502: iequals(__LINE__, Iui[x_6] == *pBl, 0);
503: if (*pBl == Iui[x_6]) complain(__LINE__);
504: if (Iui[x_6] == *pBl) complain(__LINE__);
505: iequals(__LINE__, *pBl == Il[x_7], 1);
506: iequals(__LINE__, Il[x_7] == *pBl, 1);
507: if (*pBl == Il[x_7]); else complain(__LINE__);
508: if (Il[x_7] == *pBl); else complain(__LINE__);
509: iequals(__LINE__, *pBl == Iul[x_8], 0);
510: iequals(__LINE__, Iul[x_8] == *pBl, 0);
511: if (*pBl == Iul[x_8]) complain(__LINE__);
512: if (Iul[x_8] == *pBl) complain(__LINE__);
513: iequals(__LINE__, *pBl == If[x_9], 0);
514: iequals(__LINE__, If[x_9] == *pBl, 0);
515: if (*pBl == If[x_9]) complain(__LINE__);
516: if (If[x_9] == *pBl) complain(__LINE__);
517: iequals(__LINE__, *pBl == Id[x_10], 0);
518: iequals(__LINE__, Id[x_10] == *pBl, 0);
519: if (*pBl == Id[x_10]) complain(__LINE__);
520: if (Id[x_10] == *pBl) complain(__LINE__);
521: #if ANSI
522: iequals(__LINE__, *pBl == Ild[x_11], 0);
523: iequals(__LINE__, Ild[x_11] == *pBl, 0);
524: if (*pBl == Ild[x_11]) complain(__LINE__);
525: if (Ild[x_11] == *pBl) complain(__LINE__);
526: #endif
527: iequals(__LINE__, *pBul == Ic[x_0], 0);
528: iequals(__LINE__, Ic[x_0] == *pBul, 0);
529: if (*pBul == Ic[x_0]) complain(__LINE__);
530: if (Ic[x_0] == *pBul) complain(__LINE__);
531: #if ANSI
532: iequals(__LINE__, *pBul == Isc[x_1], 0);
533: iequals(__LINE__, Isc[x_1] == *pBul, 0);
534: if (*pBul == Isc[x_1]) complain(__LINE__);
535: if (Isc[x_1] == *pBul) complain(__LINE__);
536: #endif
537: iequals(__LINE__, *pBul == Is[x_2], 0);
538: iequals(__LINE__, Is[x_2] == *pBul, 0);
539: if (*pBul == Is[x_2]) complain(__LINE__);
540: if (Is[x_2] == *pBul) complain(__LINE__);
541: iequals(__LINE__, *pBul == Ii[x_3], 0);
542: iequals(__LINE__, Ii[x_3] == *pBul, 0);
543: if (*pBul == Ii[x_3]) complain(__LINE__);
544: if (Ii[x_3] == *pBul) complain(__LINE__);
545: iequals(__LINE__, *pBul == Iuc[x_4], 0);
546: iequals(__LINE__, Iuc[x_4] == *pBul, 0);
547: if (*pBul == Iuc[x_4]) complain(__LINE__);
548: if (Iuc[x_4] == *pBul) complain(__LINE__);
549: iequals(__LINE__, *pBul == Ius[x_5], 0);
550: iequals(__LINE__, Ius[x_5] == *pBul, 0);
551: if (*pBul == Ius[x_5]) complain(__LINE__);
552: if (Ius[x_5] == *pBul) complain(__LINE__);
553: iequals(__LINE__, *pBul == Iui[x_6], 0);
554: iequals(__LINE__, Iui[x_6] == *pBul, 0);
555: if (*pBul == Iui[x_6]) complain(__LINE__);
556: if (Iui[x_6] == *pBul) complain(__LINE__);
557: iequals(__LINE__, *pBul == Il[x_7], 0);
558: iequals(__LINE__, Il[x_7] == *pBul, 0);
559: if (*pBul == Il[x_7]) complain(__LINE__);
560: if (Il[x_7] == *pBul) complain(__LINE__);
561: iequals(__LINE__, *pBul == Iul[x_8], 1);
562: iequals(__LINE__, Iul[x_8] == *pBul, 1);
563: if (*pBul == Iul[x_8]); else complain(__LINE__);
564: if (Iul[x_8] == *pBul); else complain(__LINE__);
565: iequals(__LINE__, *pBul == If[x_9], 0);
566: iequals(__LINE__, If[x_9] == *pBul, 0);
567: if (*pBul == If[x_9]) complain(__LINE__);
568: if (If[x_9] == *pBul) complain(__LINE__);
569: iequals(__LINE__, *pBul == Id[x_10], 0);
570: iequals(__LINE__, Id[x_10] == *pBul, 0);
571: if (*pBul == Id[x_10]) complain(__LINE__);
572: if (Id[x_10] == *pBul) complain(__LINE__);
573: #if ANSI
574: iequals(__LINE__, *pBul == Ild[x_11], 0);
575: iequals(__LINE__, Ild[x_11] == *pBul, 0);
576: if (*pBul == Ild[x_11]) complain(__LINE__);
577: if (Ild[x_11] == *pBul) complain(__LINE__);
578: #endif
579: iequals(__LINE__, *pBf == Ic[x_0], 0);
580: iequals(__LINE__, Ic[x_0] == *pBf, 0);
581: if (*pBf == Ic[x_0]) complain(__LINE__);
582: if (Ic[x_0] == *pBf) complain(__LINE__);
583: #if ANSI
584: iequals(__LINE__, *pBf == Isc[x_1], 0);
585: iequals(__LINE__, Isc[x_1] == *pBf, 0);
586: if (*pBf == Isc[x_1]) complain(__LINE__);
587: if (Isc[x_1] == *pBf) complain(__LINE__);
588: #endif
589: iequals(__LINE__, *pBf == Is[x_2], 0);
590: iequals(__LINE__, Is[x_2] == *pBf, 0);
591: if (*pBf == Is[x_2]) complain(__LINE__);
592: if (Is[x_2] == *pBf) complain(__LINE__);
593: iequals(__LINE__, *pBf == Ii[x_3], 0);
594: iequals(__LINE__, Ii[x_3] == *pBf, 0);
595: if (*pBf == Ii[x_3]) complain(__LINE__);
596: if (Ii[x_3] == *pBf) complain(__LINE__);
597: iequals(__LINE__, *pBf == Iuc[x_4], 0);
598: iequals(__LINE__, Iuc[x_4] == *pBf, 0);
599: if (*pBf == Iuc[x_4]) complain(__LINE__);
600: if (Iuc[x_4] == *pBf) complain(__LINE__);
601: iequals(__LINE__, *pBf == Ius[x_5], 0);
602: iequals(__LINE__, Ius[x_5] == *pBf, 0);
603: if (*pBf == Ius[x_5]) complain(__LINE__);
604: if (Ius[x_5] == *pBf) complain(__LINE__);
605: iequals(__LINE__, *pBf == Iui[x_6], 0);
606: iequals(__LINE__, Iui[x_6] == *pBf, 0);
607: if (*pBf == Iui[x_6]) complain(__LINE__);
608: if (Iui[x_6] == *pBf) complain(__LINE__);
609: iequals(__LINE__, *pBf == Il[x_7], 0);
610: iequals(__LINE__, Il[x_7] == *pBf, 0);
611: if (*pBf == Il[x_7]) complain(__LINE__);
612: if (Il[x_7] == *pBf) complain(__LINE__);
613: iequals(__LINE__, *pBf == Iul[x_8], 0);
614: iequals(__LINE__, Iul[x_8] == *pBf, 0);
615: if (*pBf == Iul[x_8]) complain(__LINE__);
616: if (Iul[x_8] == *pBf) complain(__LINE__);
617: iequals(__LINE__, *pBf == If[x_9], 1);
618: iequals(__LINE__, If[x_9] == *pBf, 1);
619: if (*pBf == If[x_9]); else complain(__LINE__);
620: if (If[x_9] == *pBf); else complain(__LINE__);
621: iequals(__LINE__, *pBf == Id[x_10], 0);
622: iequals(__LINE__, Id[x_10] == *pBf, 0);
623: if (*pBf == Id[x_10]) complain(__LINE__);
624: if (Id[x_10] == *pBf) complain(__LINE__);
625: #if ANSI
626: iequals(__LINE__, *pBf == Ild[x_11], 0);
627: iequals(__LINE__, Ild[x_11] == *pBf, 0);
628: if (*pBf == Ild[x_11]) complain(__LINE__);
629: if (Ild[x_11] == *pBf) complain(__LINE__);
630: #endif
631: iequals(__LINE__, *pBd == Ic[x_0], 0);
632: iequals(__LINE__, Ic[x_0] == *pBd, 0);
633: if (*pBd == Ic[x_0]) complain(__LINE__);
634: if (Ic[x_0] == *pBd) complain(__LINE__);
635: #if ANSI
636: iequals(__LINE__, *pBd == Isc[x_1], 0);
637: iequals(__LINE__, Isc[x_1] == *pBd, 0);
638: if (*pBd == Isc[x_1]) complain(__LINE__);
639: if (Isc[x_1] == *pBd) complain(__LINE__);
640: #endif
641: iequals(__LINE__, *pBd == Is[x_2], 0);
642: iequals(__LINE__, Is[x_2] == *pBd, 0);
643: if (*pBd == Is[x_2]) complain(__LINE__);
644: if (Is[x_2] == *pBd) complain(__LINE__);
645: iequals(__LINE__, *pBd == Ii[x_3], 0);
646: iequals(__LINE__, Ii[x_3] == *pBd, 0);
647: if (*pBd == Ii[x_3]) complain(__LINE__);
648: if (Ii[x_3] == *pBd) complain(__LINE__);
649: iequals(__LINE__, *pBd == Iuc[x_4], 0);
650: iequals(__LINE__, Iuc[x_4] == *pBd, 0);
651: if (*pBd == Iuc[x_4]) complain(__LINE__);
652: if (Iuc[x_4] == *pBd) complain(__LINE__);
653: iequals(__LINE__, *pBd == Ius[x_5], 0);
654: iequals(__LINE__, Ius[x_5] == *pBd, 0);
655: if (*pBd == Ius[x_5]) complain(__LINE__);
656: if (Ius[x_5] == *pBd) complain(__LINE__);
657: iequals(__LINE__, *pBd == Iui[x_6], 0);
658: iequals(__LINE__, Iui[x_6] == *pBd, 0);
659: if (*pBd == Iui[x_6]) complain(__LINE__);
660: if (Iui[x_6] == *pBd) complain(__LINE__);
661: iequals(__LINE__, *pBd == Il[x_7], 0);
662: iequals(__LINE__, Il[x_7] == *pBd, 0);
663: if (*pBd == Il[x_7]) complain(__LINE__);
664: if (Il[x_7] == *pBd) complain(__LINE__);
665: iequals(__LINE__, *pBd == Iul[x_8], 0);
666: iequals(__LINE__, Iul[x_8] == *pBd, 0);
667: if (*pBd == Iul[x_8]) complain(__LINE__);
668: if (Iul[x_8] == *pBd) complain(__LINE__);
669: iequals(__LINE__, *pBd == If[x_9], 0);
670: iequals(__LINE__, If[x_9] == *pBd, 0);
671: if (*pBd == If[x_9]) complain(__LINE__);
672: if (If[x_9] == *pBd) complain(__LINE__);
673: iequals(__LINE__, *pBd == Id[x_10], 1);
674: iequals(__LINE__, Id[x_10] == *pBd, 1);
675: if (*pBd == Id[x_10]); else complain(__LINE__);
676: if (Id[x_10] == *pBd); else complain(__LINE__);
677: #if ANSI
678: iequals(__LINE__, *pBd == Ild[x_11], 0);
679: iequals(__LINE__, Ild[x_11] == *pBd, 0);
680: if (*pBd == Ild[x_11]) complain(__LINE__);
681: if (Ild[x_11] == *pBd) complain(__LINE__);
682: #endif
683: #if ANSI
684: iequals(__LINE__, *pBld == Ic[x_0], 0);
685: iequals(__LINE__, Ic[x_0] == *pBld, 0);
686: if (*pBld == Ic[x_0]) complain(__LINE__);
687: if (Ic[x_0] == *pBld) complain(__LINE__);
688: #endif
689: #if ANSI
690: iequals(__LINE__, *pBld == Isc[x_1], 0);
691: iequals(__LINE__, Isc[x_1] == *pBld, 0);
692: if (*pBld == Isc[x_1]) complain(__LINE__);
693: if (Isc[x_1] == *pBld) complain(__LINE__);
694: #endif
695: #if ANSI
696: iequals(__LINE__, *pBld == Is[x_2], 0);
697: iequals(__LINE__, Is[x_2] == *pBld, 0);
698: if (*pBld == Is[x_2]) complain(__LINE__);
699: if (Is[x_2] == *pBld) complain(__LINE__);
700: #endif
701: #if ANSI
702: iequals(__LINE__, *pBld == Ii[x_3], 0);
703: iequals(__LINE__, Ii[x_3] == *pBld, 0);
704: if (*pBld == Ii[x_3]) complain(__LINE__);
705: if (Ii[x_3] == *pBld) complain(__LINE__);
706: #endif
707: #if ANSI
708: iequals(__LINE__, *pBld == Iuc[x_4], 0);
709: iequals(__LINE__, Iuc[x_4] == *pBld, 0);
710: if (*pBld == Iuc[x_4]) complain(__LINE__);
711: if (Iuc[x_4] == *pBld) complain(__LINE__);
712: #endif
713: #if ANSI
714: iequals(__LINE__, *pBld == Ius[x_5], 0);
715: iequals(__LINE__, Ius[x_5] == *pBld, 0);
716: if (*pBld == Ius[x_5]) complain(__LINE__);
717: if (Ius[x_5] == *pBld) complain(__LINE__);
718: #endif
719: #if ANSI
720: iequals(__LINE__, *pBld == Iui[x_6], 0);
721: iequals(__LINE__, Iui[x_6] == *pBld, 0);
722: if (*pBld == Iui[x_6]) complain(__LINE__);
723: if (Iui[x_6] == *pBld) complain(__LINE__);
724: #endif
725: #if ANSI
726: iequals(__LINE__, *pBld == Il[x_7], 0);
727: iequals(__LINE__, Il[x_7] == *pBld, 0);
728: if (*pBld == Il[x_7]) complain(__LINE__);
729: if (Il[x_7] == *pBld) complain(__LINE__);
730: #endif
731: #if ANSI
732: iequals(__LINE__, *pBld == Iul[x_8], 0);
733: iequals(__LINE__, Iul[x_8] == *pBld, 0);
734: if (*pBld == Iul[x_8]) complain(__LINE__);
735: if (Iul[x_8] == *pBld) complain(__LINE__);
736: #endif
737: #if ANSI
738: iequals(__LINE__, *pBld == If[x_9], 0);
739: iequals(__LINE__, If[x_9] == *pBld, 0);
740: if (*pBld == If[x_9]) complain(__LINE__);
741: if (If[x_9] == *pBld) complain(__LINE__);
742: #endif
743: #if ANSI
744: iequals(__LINE__, *pBld == Id[x_10], 0);
745: iequals(__LINE__, Id[x_10] == *pBld, 0);
746: if (*pBld == Id[x_10]) complain(__LINE__);
747: if (Id[x_10] == *pBld) complain(__LINE__);
748: #endif
749: #if ANSI
750: iequals(__LINE__, *pBld == Ild[x_11], 1);
751: iequals(__LINE__, Ild[x_11] == *pBld, 1);
752: if (*pBld == Ild[x_11]); else complain(__LINE__);
753: if (Ild[x_11] == *pBld); else complain(__LINE__);
754: #endif
755: }}
756: return report(Filename);
757: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.