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