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