148069Sbostic /*- 2*62161Sbostic * Copyright (c) 1980, 1993 3*62161Sbostic * The Regents of the University of California. All rights reserved. 448069Sbostic * 548069Sbostic * %sccs.include.redist.c% 622561Sdist */ 75537Slinton 822561Sdist #ifndef lint 9*62161Sbostic static char sccsid[] = "@(#)opinfo.c 8.1 (Berkeley) 06/06/93"; 1048069Sbostic #endif /* not lint */ 115537Slinton 125537Slinton /* 135562Slinton * Operator information structure. 145537Slinton */ 155537Slinton 165537Slinton #include "defs.h" 175537Slinton #include "opinfo.h" 185537Slinton 195537Slinton OPINFO opinfo[] ={ 205537Slinton /* O_NOP */ 0, 0, 215537Slinton /* O_NAME */ LEAF, 0, 225537Slinton /* O_QNAME */ LEAF, "$", 235537Slinton /* O_LCON */ LEAF, 0, 245537Slinton /* O_FCON */ LEAF, 0, 255537Slinton /* O_SCON */ LEAF, 0, 2611062Slinton /* O_INDEX */ UNARY, 0, 275537Slinton /* O_INDIR */ UNARY, "^", 285537Slinton /* O_RVAL */ UNARY, 0, 295537Slinton /* O_COMMA */ BINARY, ",", 305537Slinton /* O_ITOF */ UNARY|INTOP, 0, 315537Slinton /* O_ADD */ BINARY|INTOP, "+", 325537Slinton /* O_ADDF */ BINARY|REALOP, "+", 335537Slinton /* O_SUB */ BINARY|INTOP, "-", 345537Slinton /* O_SUBF */ BINARY|REALOP, "-", 355537Slinton /* O_NEG */ UNARY|INTOP, "-", 365537Slinton /* O_NEGF */ UNARY|REALOP, "-", 375537Slinton /* O_MUL */ BINARY|INTOP, "*", 385537Slinton /* O_MULF */ BINARY|REALOP, "*", 395537Slinton /* O_DIVF */ BINARY|REALOP, "/", 405537Slinton /* O_DIV */ BINARY|INTOP, " div ", 415537Slinton /* O_MOD */ BINARY|INTOP, " mod ", 425537Slinton /* O_AND */ BINARY|INTOP, " and ", 435537Slinton /* O_OR */ BINARY|INTOP, " or ", 445537Slinton /* O_LT */ BINARY|INTOP, " < ", 455537Slinton /* O_LTF */ BINARY|REALOP, " < ", 465537Slinton /* O_LE */ BINARY|INTOP, " <= ", 475537Slinton /* O_LEF */ BINARY|REALOP, " <= ", 485537Slinton /* O_GT */ BINARY|INTOP, " > ", 495537Slinton /* O_GTF */ BINARY|REALOP, " > ", 505537Slinton /* O_GE */ BINARY|INTOP, " >= ", 515537Slinton /* O_GEF */ BINARY|REALOP, " >= ", 525537Slinton /* O_EQ */ BINARY|INTOP, " = ", 535537Slinton /* O_EQF */ BINARY|REALOP, " = ", 545537Slinton /* O_NE */ BINARY|INTOP, " <> ", 555537Slinton /* O_NEF */ BINARY|REALOP, " <> ", 565537Slinton /* O_ASSIGN */ BINARY, " := ", 575537Slinton /* O_CHFILE */ 0, NIL, 585537Slinton /* O_CONT */ 0, NIL, 595537Slinton /* O_LIST */ 0, NIL, 605537Slinton /* O_NEXT */ 0, NIL, 615537Slinton /* O_PRINT */ 0, NIL, 625537Slinton /* O_STEP */ 0, NIL, 635537Slinton /* O_WHATIS */ 0, NIL, 645537Slinton /* O_WHERE */ 0, NIL, 655537Slinton /* O_XI */ 0, NIL, 665537Slinton /* O_XD */ 0, NIL, 675537Slinton /* O_CALL */ 0, NIL, 685537Slinton /* O_EDIT */ 0, NIL, 695537Slinton /* O_DUMP */ 0, NIL, 705537Slinton /* O_HELP */ 0, NIL, 715537Slinton /* O_REMAKE */ 0, NIL, 725537Slinton /* O_RUN */ 0, NIL, 735537Slinton /* O_SOURCE */ 0, NIL, 745537Slinton /* O_STATUS */ 0, NIL, 755537Slinton /* O_TRACE */ 0, NIL, 765537Slinton /* O_TRACEI */ 0, NIL, 775537Slinton /* O_STOP */ 0, NIL, 785537Slinton /* O_STOPI */ 0, NIL, 795537Slinton /* O_DELETE */ 0, NIL, 805537Slinton /* O_WHICH */ 0, NIL, 815537Slinton /* O_QLINE */ LEAF, NIL, 825537Slinton /* O_ALIAS */ LEAF, NIL, 835562Slinton /* O_GRIPE */ 0, NIL, 845537Slinton }; 85