1 /* Copyright (c) 1982 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)opinfo.c 1.2 01/18/82"; 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 */ BINARY, 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 }; 78