|
|
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.