15537Slinton /* Copyright (c) 1982 Regents of the University of California */ 25537Slinton 3*5562Slinton static char sccsid[] = "@(#)opinfo.c 1.2 01/18/82"; 45537Slinton 55537Slinton /* 6*5562Slinton * Operator information structure. 75537Slinton */ 85537Slinton 95537Slinton #include "defs.h" 105537Slinton #include "opinfo.h" 115537Slinton 125537Slinton OPINFO opinfo[] ={ 135537Slinton /* O_NOP */ 0, 0, 145537Slinton /* O_NAME */ LEAF, 0, 155537Slinton /* O_QNAME */ LEAF, "$", 165537Slinton /* O_LCON */ LEAF, 0, 175537Slinton /* O_FCON */ LEAF, 0, 185537Slinton /* O_SCON */ LEAF, 0, 195537Slinton /* O_INDEX */ BINARY, 0, 205537Slinton /* O_INDIR */ UNARY, "^", 215537Slinton /* O_RVAL */ UNARY, 0, 225537Slinton /* O_COMMA */ BINARY, ",", 235537Slinton /* O_ITOF */ UNARY|INTOP, 0, 245537Slinton /* O_ADD */ BINARY|INTOP, "+", 255537Slinton /* O_ADDF */ BINARY|REALOP, "+", 265537Slinton /* O_SUB */ BINARY|INTOP, "-", 275537Slinton /* O_SUBF */ BINARY|REALOP, "-", 285537Slinton /* O_NEG */ UNARY|INTOP, "-", 295537Slinton /* O_NEGF */ UNARY|REALOP, "-", 305537Slinton /* O_MUL */ BINARY|INTOP, "*", 315537Slinton /* O_MULF */ BINARY|REALOP, "*", 325537Slinton /* O_DIVF */ BINARY|REALOP, "/", 335537Slinton /* O_DIV */ BINARY|INTOP, " div ", 345537Slinton /* O_MOD */ BINARY|INTOP, " mod ", 355537Slinton /* O_AND */ BINARY|INTOP, " and ", 365537Slinton /* O_OR */ BINARY|INTOP, " or ", 375537Slinton /* O_LT */ BINARY|INTOP, " < ", 385537Slinton /* O_LTF */ BINARY|REALOP, " < ", 395537Slinton /* O_LE */ BINARY|INTOP, " <= ", 405537Slinton /* O_LEF */ BINARY|REALOP, " <= ", 415537Slinton /* O_GT */ BINARY|INTOP, " > ", 425537Slinton /* O_GTF */ BINARY|REALOP, " > ", 435537Slinton /* O_GE */ BINARY|INTOP, " >= ", 445537Slinton /* O_GEF */ BINARY|REALOP, " >= ", 455537Slinton /* O_EQ */ BINARY|INTOP, " = ", 465537Slinton /* O_EQF */ BINARY|REALOP, " = ", 475537Slinton /* O_NE */ BINARY|INTOP, " <> ", 485537Slinton /* O_NEF */ BINARY|REALOP, " <> ", 495537Slinton /* O_ASSIGN */ BINARY, " := ", 505537Slinton /* O_CHFILE */ 0, NIL, 515537Slinton /* O_CONT */ 0, NIL, 525537Slinton /* O_LIST */ 0, NIL, 535537Slinton /* O_NEXT */ 0, NIL, 545537Slinton /* O_PRINT */ 0, NIL, 555537Slinton /* O_STEP */ 0, NIL, 565537Slinton /* O_WHATIS */ 0, NIL, 575537Slinton /* O_WHERE */ 0, NIL, 585537Slinton /* O_XI */ 0, NIL, 595537Slinton /* O_XD */ 0, NIL, 605537Slinton /* O_CALL */ 0, NIL, 615537Slinton /* O_EDIT */ 0, NIL, 625537Slinton /* O_DUMP */ 0, NIL, 635537Slinton /* O_HELP */ 0, NIL, 645537Slinton /* O_REMAKE */ 0, NIL, 655537Slinton /* O_RUN */ 0, NIL, 665537Slinton /* O_SOURCE */ 0, NIL, 675537Slinton /* O_STATUS */ 0, NIL, 685537Slinton /* O_TRACE */ 0, NIL, 695537Slinton /* O_TRACEI */ 0, NIL, 705537Slinton /* O_STOP */ 0, NIL, 715537Slinton /* O_STOPI */ 0, NIL, 725537Slinton /* O_DELETE */ 0, NIL, 735537Slinton /* O_WHICH */ 0, NIL, 745537Slinton /* O_QLINE */ LEAF, NIL, 755537Slinton /* O_ALIAS */ LEAF, NIL, 76*5562Slinton /* O_GRIPE */ 0, NIL, 775537Slinton }; 78