|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2: #include "whoami"
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: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.