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