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