|
|
1.1 root 1: /* Copyright (c) 1982 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)opinfo.c 1.3 2/14/83";
4:
5: /*
6: * Operator information structure.
7: */
8:
9: #include "defs.h"
10: #include "opinfo.h"
11:
12: OPINFO opinfo[] ={
13: /* O_NOP */ 0, 0,
14: /* O_NAME */ LEAF, 0,
15: /* O_QNAME */ LEAF, "$",
16: /* O_LCON */ LEAF, 0,
17: /* O_FCON */ LEAF, 0,
18: /* O_SCON */ LEAF, 0,
19: /* O_INDEX */ UNARY, 0,
20: /* O_INDIR */ UNARY, "^",
21: /* O_RVAL */ UNARY, 0,
22: /* O_COMMA */ BINARY, ",",
23: /* O_ITOF */ UNARY|INTOP, 0,
24: /* O_ADD */ BINARY|INTOP, "+",
25: /* O_ADDF */ BINARY|REALOP, "+",
26: /* O_SUB */ BINARY|INTOP, "-",
27: /* O_SUBF */ BINARY|REALOP, "-",
28: /* O_NEG */ UNARY|INTOP, "-",
29: /* O_NEGF */ UNARY|REALOP, "-",
30: /* O_MUL */ BINARY|INTOP, "*",
31: /* O_MULF */ BINARY|REALOP, "*",
32: /* O_DIVF */ BINARY|REALOP, "/",
33: /* O_DIV */ BINARY|INTOP, " div ",
34: /* O_MOD */ BINARY|INTOP, " mod ",
35: /* O_AND */ BINARY|INTOP, " and ",
36: /* O_OR */ BINARY|INTOP, " or ",
37: /* O_LT */ BINARY|INTOP, " < ",
38: /* O_LTF */ BINARY|REALOP, " < ",
39: /* O_LE */ BINARY|INTOP, " <= ",
40: /* O_LEF */ BINARY|REALOP, " <= ",
41: /* O_GT */ BINARY|INTOP, " > ",
42: /* O_GTF */ BINARY|REALOP, " > ",
43: /* O_GE */ BINARY|INTOP, " >= ",
44: /* O_GEF */ BINARY|REALOP, " >= ",
45: /* O_EQ */ BINARY|INTOP, " = ",
46: /* O_EQF */ BINARY|REALOP, " = ",
47: /* O_NE */ BINARY|INTOP, " <> ",
48: /* O_NEF */ BINARY|REALOP, " <> ",
49: /* O_ASSIGN */ BINARY, " := ",
50: /* O_CHFILE */ 0, NIL,
51: /* O_CONT */ 0, NIL,
52: /* O_LIST */ 0, NIL,
53: /* O_NEXT */ 0, NIL,
54: /* O_PRINT */ 0, NIL,
55: /* O_STEP */ 0, NIL,
56: /* O_WHATIS */ 0, NIL,
57: /* O_WHERE */ 0, NIL,
58: /* O_XI */ 0, NIL,
59: /* O_XD */ 0, NIL,
60: /* O_CALL */ 0, NIL,
61: /* O_EDIT */ 0, NIL,
62: /* O_DUMP */ 0, NIL,
63: /* O_HELP */ 0, NIL,
64: /* O_REMAKE */ 0, NIL,
65: /* O_RUN */ 0, NIL,
66: /* O_SOURCE */ 0, NIL,
67: /* O_STATUS */ 0, NIL,
68: /* O_TRACE */ 0, NIL,
69: /* O_TRACEI */ 0, NIL,
70: /* O_STOP */ 0, NIL,
71: /* O_STOPI */ 0, NIL,
72: /* O_DELETE */ 0, NIL,
73: /* O_WHICH */ 0, NIL,
74: /* O_QLINE */ LEAF, NIL,
75: /* O_ALIAS */ LEAF, NIL,
76: /* O_GRIPE */ 0, NIL,
77: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.