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