![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to remain.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 remain.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: #include "m.h" ! 13: int main() ! 14: { ! 15: extern char *Filename; ! 16: typedef union { ! 17: CHAR c; ! 18: SHORT s; ! 19: INT i; ! 20: UCHAR uc; ! 21: USHORT us; ! 22: UINT ui; ! 23: LONG l; ! 24: ULONG ul; ! 25: FLOAT f; ! 26: DOUBLE d; ! 27: #if ANSI ! 28: SCHAR sc; ! 29: LDOUBLE ld; ! 30: #endif ! 31: } E; ! 32: auto E E1, *pE1 = &E1; ! 33: #if ANSI ! 34: auto E E2, *pE2 = &E2; ! 35: #endif ! 36: auto E E3, *pE3 = &E3; ! 37: auto E E4, *pE4 = &E4; ! 38: auto E E5, *pE5 = &E5; ! 39: auto E E6, *pE6 = &E6; ! 40: auto E E7, *pE7 = &E7; ! 41: auto E E8, *pE8 = &E8; ! 42: auto E E9, *pE9 = &E9; ! 43: auto E E10, *pE10 = &E10; ! 44: auto E E11, *pE11 = &E11; ! 45: #if ANSI ! 46: auto E E12, *pE12 = &E12; ! 47: #endif ! 48: pE1->c = 7; ! 49: #if ANSI ! 50: pE2->sc = 8; ! 51: #endif ! 52: pE3->s = 9; ! 53: pE4->i = 10; ! 54: pE5->uc = 11; ! 55: pE6->us = 12; ! 56: pE7->ui = 13; ! 57: pE8->l = 14; ! 58: pE9->ul = 15; ! 59: pE10->f = 16; ! 60: pE11->d = 17; ! 61: #if ANSI ! 62: pE12->ld = 18; ! 63: #endif ! 64: { ! 65: CHAR Mc(); ! 66: #if ANSI ! 67: SCHAR Msc(); ! 68: #endif ! 69: SHORT Ms(); ! 70: INT Mi(); ! 71: UCHAR Muc(); ! 72: USHORT Mus(); ! 73: UINT Mui(); ! 74: LONG Ml(); ! 75: ULONG Mul(); ! 76: FLOAT Mf(); ! 77: DOUBLE Md(); ! 78: #if ANSI ! 79: LDOUBLE Mld(); ! 80: #endif ! 81: { ! 82: int true = 1, false = 0; ! 83: Filename = " auto punion auto func rem "; ! 84: iequals(__LINE__, pE1->c % Mc(), 0); ! 85: iequals(__LINE__, Mc() % pE1->c, 0); ! 86: #if ANSI ! 87: iequals(__LINE__, pE1->c % Msc(), 7); ! 88: iequals(__LINE__, Msc() % pE1->c, 1); ! 89: #endif ! 90: iequals(__LINE__, pE1->c % Ms(), 7); ! 91: iequals(__LINE__, Ms() % pE1->c, 2); ! 92: iequals(__LINE__, pE1->c % Mi(), 7); ! 93: iequals(__LINE__, Mi() % pE1->c, 3); ! 94: iequals(__LINE__, pE1->c % Muc(), 7); ! 95: iequals(__LINE__, Muc() % pE1->c, 4); ! 96: iequals(__LINE__, pE1->c % Mus(), 7); ! 97: iequals(__LINE__, Mus() % pE1->c, 5); ! 98: iequals(__LINE__, pE1->c % Mui(), 7); ! 99: iequals(__LINE__, Mui() % pE1->c, 6); ! 100: lequals(__LINE__, pE1->c % Ml(), 7L); ! 101: lequals(__LINE__, Ml() % pE1->c, 0L); ! 102: lequals(__LINE__, pE1->c % Mul(), 7L); ! 103: lequals(__LINE__, Mul() % pE1->c, 1L); ! 104: #if ANSI ! 105: iequals(__LINE__, pE2->sc % Mc(), 1); ! 106: iequals(__LINE__, Mc() % pE2->sc, 7); ! 107: #endif ! 108: #if ANSI ! 109: iequals(__LINE__, pE2->sc % Msc(), 0); ! 110: iequals(__LINE__, Msc() % pE2->sc, 0); ! 111: #endif ! 112: #if ANSI ! 113: iequals(__LINE__, pE2->sc % Ms(), 8); ! 114: iequals(__LINE__, Ms() % pE2->sc, 1); ! 115: #endif ! 116: #if ANSI ! 117: iequals(__LINE__, pE2->sc % Mi(), 8); ! 118: iequals(__LINE__, Mi() % pE2->sc, 2); ! 119: #endif ! 120: #if ANSI ! 121: iequals(__LINE__, pE2->sc % Muc(), 8); ! 122: iequals(__LINE__, Muc() % pE2->sc, 3); ! 123: #endif ! 124: #if ANSI ! 125: iequals(__LINE__, pE2->sc % Mus(), 8); ! 126: iequals(__LINE__, Mus() % pE2->sc, 4); ! 127: #endif ! 128: #if ANSI ! 129: iequals(__LINE__, pE2->sc % Mui(), 8); ! 130: iequals(__LINE__, Mui() % pE2->sc, 5); ! 131: #endif ! 132: #if ANSI ! 133: lequals(__LINE__, pE2->sc % Ml(), 8L); ! 134: lequals(__LINE__, Ml() % pE2->sc, 6L); ! 135: #endif ! 136: #if ANSI ! 137: lequals(__LINE__, pE2->sc % Mul(), 8L); ! 138: lequals(__LINE__, Mul() % pE2->sc, 7L); ! 139: #endif ! 140: iequals(__LINE__, pE3->s % Mc(), 2); ! 141: iequals(__LINE__, Mc() % pE3->s, 7); ! 142: #if ANSI ! 143: iequals(__LINE__, pE3->s % Msc(), 1); ! 144: iequals(__LINE__, Msc() % pE3->s, 8); ! 145: #endif ! 146: iequals(__LINE__, pE3->s % Ms(), 0); ! 147: iequals(__LINE__, Ms() % pE3->s, 0); ! 148: iequals(__LINE__, pE3->s % Mi(), 9); ! 149: iequals(__LINE__, Mi() % pE3->s, 1); ! 150: iequals(__LINE__, pE3->s % Muc(), 9); ! 151: iequals(__LINE__, Muc() % pE3->s, 2); ! 152: iequals(__LINE__, pE3->s % Mus(), 9); ! 153: iequals(__LINE__, Mus() % pE3->s, 3); ! 154: iequals(__LINE__, pE3->s % Mui(), 9); ! 155: iequals(__LINE__, Mui() % pE3->s, 4); ! 156: lequals(__LINE__, pE3->s % Ml(), 9L); ! 157: lequals(__LINE__, Ml() % pE3->s, 5L); ! 158: lequals(__LINE__, pE3->s % Mul(), 9L); ! 159: lequals(__LINE__, Mul() % pE3->s, 6L); ! 160: iequals(__LINE__, pE4->i % Mc(), 3); ! 161: iequals(__LINE__, Mc() % pE4->i, 7); ! 162: #if ANSI ! 163: iequals(__LINE__, pE4->i % Msc(), 2); ! 164: iequals(__LINE__, Msc() % pE4->i, 8); ! 165: #endif ! 166: iequals(__LINE__, pE4->i % Ms(), 1); ! 167: iequals(__LINE__, Ms() % pE4->i, 9); ! 168: iequals(__LINE__, pE4->i % Mi(), 0); ! 169: iequals(__LINE__, Mi() % pE4->i, 0); ! 170: iequals(__LINE__, pE4->i % Muc(), 10); ! 171: iequals(__LINE__, Muc() % pE4->i, 1); ! 172: iequals(__LINE__, pE4->i % Mus(), 10); ! 173: iequals(__LINE__, Mus() % pE4->i, 2); ! 174: iequals(__LINE__, pE4->i % Mui(), 10); ! 175: iequals(__LINE__, Mui() % pE4->i, 3); ! 176: lequals(__LINE__, pE4->i % Ml(), 10L); ! 177: lequals(__LINE__, Ml() % pE4->i, 4L); ! 178: lequals(__LINE__, pE4->i % Mul(), 10L); ! 179: lequals(__LINE__, Mul() % pE4->i, 5L); ! 180: iequals(__LINE__, pE5->uc % Mc(), 4); ! 181: iequals(__LINE__, Mc() % pE5->uc, 7); ! 182: #if ANSI ! 183: iequals(__LINE__, pE5->uc % Msc(), 3); ! 184: iequals(__LINE__, Msc() % pE5->uc, 8); ! 185: #endif ! 186: iequals(__LINE__, pE5->uc % Ms(), 2); ! 187: iequals(__LINE__, Ms() % pE5->uc, 9); ! 188: iequals(__LINE__, pE5->uc % Mi(), 1); ! 189: iequals(__LINE__, Mi() % pE5->uc, 10); ! 190: iequals(__LINE__, pE5->uc % Muc(), 0); ! 191: iequals(__LINE__, Muc() % pE5->uc, 0); ! 192: iequals(__LINE__, pE5->uc % Mus(), 11); ! 193: iequals(__LINE__, Mus() % pE5->uc, 1); ! 194: iequals(__LINE__, pE5->uc % Mui(), 11); ! 195: iequals(__LINE__, Mui() % pE5->uc, 2); ! 196: lequals(__LINE__, pE5->uc % Ml(), 11L); ! 197: lequals(__LINE__, Ml() % pE5->uc, 3L); ! 198: lequals(__LINE__, pE5->uc % Mul(), 11L); ! 199: lequals(__LINE__, Mul() % pE5->uc, 4L); ! 200: iequals(__LINE__, pE6->us % Mc(), 5); ! 201: iequals(__LINE__, Mc() % pE6->us, 7); ! 202: #if ANSI ! 203: iequals(__LINE__, pE6->us % Msc(), 4); ! 204: iequals(__LINE__, Msc() % pE6->us, 8); ! 205: #endif ! 206: iequals(__LINE__, pE6->us % Ms(), 3); ! 207: iequals(__LINE__, Ms() % pE6->us, 9); ! 208: iequals(__LINE__, pE6->us % Mi(), 2); ! 209: iequals(__LINE__, Mi() % pE6->us, 10); ! 210: iequals(__LINE__, pE6->us % Muc(), 1); ! 211: iequals(__LINE__, Muc() % pE6->us, 11); ! 212: iequals(__LINE__, pE6->us % Mus(), 0); ! 213: iequals(__LINE__, Mus() % pE6->us, 0); ! 214: iequals(__LINE__, pE6->us % Mui(), 12); ! 215: iequals(__LINE__, Mui() % pE6->us, 1); ! 216: lequals(__LINE__, pE6->us % Ml(), 12L); ! 217: lequals(__LINE__, Ml() % pE6->us, 2L); ! 218: lequals(__LINE__, pE6->us % Mul(), 12L); ! 219: lequals(__LINE__, Mul() % pE6->us, 3L); ! 220: iequals(__LINE__, pE7->ui % Mc(), 6); ! 221: iequals(__LINE__, Mc() % pE7->ui, 7); ! 222: #if ANSI ! 223: iequals(__LINE__, pE7->ui % Msc(), 5); ! 224: iequals(__LINE__, Msc() % pE7->ui, 8); ! 225: #endif ! 226: iequals(__LINE__, pE7->ui % Ms(), 4); ! 227: iequals(__LINE__, Ms() % pE7->ui, 9); ! 228: iequals(__LINE__, pE7->ui % Mi(), 3); ! 229: iequals(__LINE__, Mi() % pE7->ui, 10); ! 230: iequals(__LINE__, pE7->ui % Muc(), 2); ! 231: iequals(__LINE__, Muc() % pE7->ui, 11); ! 232: iequals(__LINE__, pE7->ui % Mus(), 1); ! 233: iequals(__LINE__, Mus() % pE7->ui, 12); ! 234: iequals(__LINE__, pE7->ui % Mui(), 0); ! 235: iequals(__LINE__, Mui() % pE7->ui, 0); ! 236: lequals(__LINE__, pE7->ui % Ml(), 13L); ! 237: lequals(__LINE__, Ml() % pE7->ui, 1L); ! 238: lequals(__LINE__, pE7->ui % Mul(), 13L); ! 239: lequals(__LINE__, Mul() % pE7->ui, 2L); ! 240: lequals(__LINE__, pE8->l % Mc(), 0L); ! 241: lequals(__LINE__, Mc() % pE8->l, 7L); ! 242: #if ANSI ! 243: lequals(__LINE__, pE8->l % Msc(), 6L); ! 244: lequals(__LINE__, Msc() % pE8->l, 8L); ! 245: #endif ! 246: lequals(__LINE__, pE8->l % Ms(), 5L); ! 247: lequals(__LINE__, Ms() % pE8->l, 9L); ! 248: lequals(__LINE__, pE8->l % Mi(), 4L); ! 249: lequals(__LINE__, Mi() % pE8->l, 10L); ! 250: lequals(__LINE__, pE8->l % Muc(), 3L); ! 251: lequals(__LINE__, Muc() % pE8->l, 11L); ! 252: lequals(__LINE__, pE8->l % Mus(), 2L); ! 253: lequals(__LINE__, Mus() % pE8->l, 12L); ! 254: lequals(__LINE__, pE8->l % Mui(), 1L); ! 255: lequals(__LINE__, Mui() % pE8->l, 13L); ! 256: lequals(__LINE__, pE8->l % Ml(), 0L); ! 257: lequals(__LINE__, Ml() % pE8->l, 0L); ! 258: lequals(__LINE__, pE8->l % Mul(), 14L); ! 259: lequals(__LINE__, Mul() % pE8->l, 1L); ! 260: lequals(__LINE__, pE9->ul % Mc(), 1L); ! 261: lequals(__LINE__, Mc() % pE9->ul, 7L); ! 262: #if ANSI ! 263: lequals(__LINE__, pE9->ul % Msc(), 7L); ! 264: lequals(__LINE__, Msc() % pE9->ul, 8L); ! 265: #endif ! 266: lequals(__LINE__, pE9->ul % Ms(), 6L); ! 267: lequals(__LINE__, Ms() % pE9->ul, 9L); ! 268: lequals(__LINE__, pE9->ul % Mi(), 5L); ! 269: lequals(__LINE__, Mi() % pE9->ul, 10L); ! 270: lequals(__LINE__, pE9->ul % Muc(), 4L); ! 271: lequals(__LINE__, Muc() % pE9->ul, 11L); ! 272: lequals(__LINE__, pE9->ul % Mus(), 3L); ! 273: lequals(__LINE__, Mus() % pE9->ul, 12L); ! 274: lequals(__LINE__, pE9->ul % Mui(), 2L); ! 275: lequals(__LINE__, Mui() % pE9->ul, 13L); ! 276: lequals(__LINE__, pE9->ul % Ml(), 1L); ! 277: lequals(__LINE__, Ml() % pE9->ul, 14L); ! 278: lequals(__LINE__, pE9->ul % Mul(), 0L); ! 279: lequals(__LINE__, Mul() % pE9->ul, 0L); ! 280: }} ! 281: return report(Filename); ! 282: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.