4.3BSD - /usr/src/new/icon/link/opcode.c

   1: #include "ilink.h"
   2: #include "opcode.h"
   3: 
   4: /*
   5:  * Opcode table.
   6:  */
   7: 
   8: struct opentry optable[] = {
   9:    "asgn",  OP_ASGN,
  10:    "bang",  OP_BANG,
  11:    "bscan", OP_BSCAN,
  12:    "cat",   OP_CAT,
  13:    "ccase", OP_CCASE,
  14:    "chfail",    OP_CHFAIL,
  15:    "coact", OP_COACT,
  16:    "cofail",    OP_COFAIL,
  17:    "compl", OP_COMPL,
  18:    "con",   OP_CON,
  19:    "coret", OP_CORET,
  20:    "create",    OP_CREATE,
  21:    "cset",  OP_CSET,
  22:    "declend",   OP_DECLEND,
  23:    "diff",  OP_DIFF,
  24:    "div",   OP_DIV,
  25:    "dup",   OP_DUP,
  26:    "efail", OP_EFAIL,
  27:    "end",   OP_END,
  28:    "eqv",   OP_EQV,
  29:    "eret",  OP_ERET,
  30:    "error", OP_ERROR,
  31:    "escan", OP_ESCAN,
  32:    "esusp", OP_ESUSP,
  33:    "field", OP_FIELD,
  34:    "file",  OP_FILE,
  35:    "global",    OP_GLOBAL,
  36:    "goto",  OP_GOTO,
  37:    "impl",  OP_IMPL,
  38:    "incres",    OP_INCRES,
  39:    "init?", OP_INIT,
  40:    "int",   OP_INT,
  41:    "inter", OP_INTER,
  42:    "invoke",    OP_INVOKE,
  43:    "keywd", OP_KEYWD,
  44:    "lab",   OP_LAB,
  45:    "lconcat",   OP_LCONCAT,
  46:    "lexeq", OP_LEXEQ,
  47:    "lexge", OP_LEXGE,
  48:    "lexgt", OP_LEXGT,
  49:    "lexle", OP_LEXLE,
  50:    "lexlt", OP_LEXLT,
  51:    "lexne", OP_LEXNE,
  52:    "limit", OP_LIMIT,
  53:    "line",  OP_LINE,
  54:    "link",  OP_LINK,
  55:    "llist", OP_LLIST,
  56:    "local", OP_LOCAL,
  57:    "lsusp", OP_LSUSP,
  58:    "mark",  OP_MARK,
  59:    "minus", OP_MINUS,
  60:    "mod",   OP_MOD,
  61:    "mult",  OP_MULT,
  62:    "neg",   OP_NEG,
  63:    "neqv",  OP_NEQV,
  64:    "nonnull",   OP_NONNULL,
  65:    "null",  OP_NULL,
  66:    "number",    OP_NUMBER,
  67:    "numeq", OP_NUMEQ,
  68:    "numge", OP_NUMGE,
  69:    "numgt", OP_NUMGT,
  70:    "numle", OP_NUMLE,
  71:    "numlt", OP_NUMLT,
  72:    "numne", OP_NUMNE,
  73:    "pfail", OP_PFAIL,
  74:    "plus",  OP_PLUS,
  75:    "pnull", OP_PNULL,
  76:    "pop",   OP_POP,
  77:    "power", OP_POWER,
  78:    "pret",  OP_PRET,
  79:    "proc",  OP_PROC,
  80:    "psusp", OP_PSUSP,
  81:    "push1", OP_PUSH1,
  82:    "pushn1",    OP_PUSHN1,
  83:    "random",    OP_RANDOM,
  84:    "rasgn", OP_RASGN,
  85:    "real",  OP_REAL,
  86:    "record",    OP_RECORD,
  87:    "refresh",   OP_REFRESH,
  88:    "rswap", OP_RSWAP,
  89:    "sdup",  OP_SDUP,
  90:    "sect",      OP_SECT,
  91:    "size",  OP_SIZE,
  92:    "str",   OP_STR,
  93:    "subsc", OP_SUBSC,
  94:    "swap",  OP_SWAP,
  95:    "tabmat",    OP_TABMAT,
  96:    "toby",  OP_TOBY,
  97:    "trace", OP_TRACE,
  98:    "unioncs",   OP_UNIONCS,
  99:    "unmark",    OP_UNMARK,
 100:    "value", OP_VALUE,
 101:    "var",   OP_VAR,
 102:    };
 103: 
 104: int NOPCODES = sizeof(optable) / sizeof(struct opentry);

Defined variables