|
|
1.1 ! root 1: /* Copyright (c) 1979 Regents of the University of California */ ! 2: ! 3: static char sccsid[] = "@(#)TRdata.c 1.1 8/27/80"; ! 4: ! 5: #include "whoami.h" ! 6: #include "0.h" ! 7: #ifdef PI1 ! 8: #ifdef DEBUG ! 9: char *trnames[] ! 10: { ! 11: 0, ! 12: "MINUS", ! 13: "MOD", ! 14: "DIV", ! 15: "DIVD", ! 16: "MULT", ! 17: "ADD", ! 18: "SUB", ! 19: "EQ", ! 20: "NE", ! 21: "LT", ! 22: "GT", ! 23: "LE", ! 24: "GE", ! 25: "NOT", ! 26: "AND", ! 27: "OR", ! 28: "ASGN", ! 29: "PLUS", ! 30: "IN", ! 31: "LISTPP", ! 32: "PDEC", ! 33: "FDEC", ! 34: "PVAL", ! 35: "PVAR", ! 36: "PFUNC", ! 37: "PPROC", ! 38: "NIL", ! 39: "STRNG", ! 40: "CSTRNG", ! 41: "PLUSC", ! 42: "MINUSC", ! 43: "ID", ! 44: "INT", ! 45: "FINT", ! 46: "CINT", ! 47: "CFINT", ! 48: "TYPTR", ! 49: "TYPACK", ! 50: "TYSCAL", ! 51: "TYRANG", ! 52: "TYARY", ! 53: "TYFILE", ! 54: "TYSET", ! 55: "TYREC", ! 56: "TYFIELD", ! 57: "TYVARPT", ! 58: "TYVARNT", ! 59: "CSTAT", ! 60: "BLOCK", ! 61: "BSTL", ! 62: "LABEL", ! 63: "PCALL", ! 64: "FCALL", ! 65: "CASE", ! 66: "WITH", ! 67: "WHILE", ! 68: "REPEAT", ! 69: "FORU", ! 70: "FORD", ! 71: "GOTO", ! 72: "IF", ! 73: "ASRT", ! 74: "CSET", ! 75: "RANG", ! 76: "VAR", ! 77: "ARGL", ! 78: "ARY", ! 79: "FIELD", ! 80: "PTR", ! 81: "WEXP", ! 82: "PROG", ! 83: "BINT", ! 84: "CBINT", ! 85: "IFEL", ! 86: "IFX", ! 87: "TYID", ! 88: "COPSTR", ! 89: "BOTTLE", ! 90: "RFIELD", ! 91: "FLDLST", ! 92: "LAST" ! 93: }; ! 94: #endif ! 95: #endif ! 96: ! 97: char *trdesc[] ! 98: { ! 99: 0, ! 100: "dp", ! 101: "dpp", ! 102: "dpp", ! 103: "dpp", ! 104: "dpp", ! 105: "dpp", ! 106: "dpp", ! 107: "dpp", ! 108: "dpp", ! 109: "dpp", ! 110: "dpp", ! 111: "dpp", ! 112: "dpp", ! 113: "dp", ! 114: "dpp", ! 115: "dpp", ! 116: "npp", ! 117: "dp", ! 118: "dpp", ! 119: "pp", ! 120: "n\"pp", ! 121: "n\"pp", ! 122: "pp", ! 123: "pp", ! 124: "pp", ! 125: "p", ! 126: "d", ! 127: "dp", ! 128: "p", ! 129: "p", ! 130: "p", ! 131: "p", ! 132: "dp", ! 133: "dp", ! 134: "p", ! 135: "p", ! 136: "np", ! 137: "np", ! 138: "np", ! 139: "npp", ! 140: "npp", ! 141: "np", ! 142: "np", ! 143: "np", ! 144: "pp", ! 145: "nppp", ! 146: "npp", ! 147: "npp", ! 148: "np", ! 149: "np", ! 150: "n\"p", ! 151: "n\"p", ! 152: "n\"p", ! 153: "npp", ! 154: "npp", ! 155: "npp", ! 156: "npp", ! 157: "nppp", ! 158: "nppp", ! 159: "n\"", ! 160: "nppp", ! 161: "np", ! 162: "dp", ! 163: "pp", ! 164: "n\"p", ! 165: "p", ! 166: "p", ! 167: "pp", ! 168: "", ! 169: "ppp", ! 170: "n\"pp", ! 171: "dp", ! 172: "p", ! 173: "nppp", ! 174: "nppp", ! 175: "np", ! 176: "s", ! 177: "nnnnn", ! 178: "npp", ! 179: "npp", ! 180: "x" ! 181: }; ! 182: char *opnames[] ! 183: { ! 184: 0, ! 185: "unary -", ! 186: "mod", ! 187: "div", ! 188: "/", ! 189: "*", ! 190: "+", ! 191: "-", ! 192: "=", ! 193: "<>", ! 194: "<", ! 195: ">", ! 196: "<=", ! 197: ">=", ! 198: "not", ! 199: "and", ! 200: "or", ! 201: ":=", ! 202: "unary +", ! 203: "in" ! 204: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.