1/*
2** $Id: lopcodes.c $
3** Opcodes for Lua virtual machine
4** See Copyright Notice in lua.h
5*/
6
7#define lopcodes_c
8#define LUA_CORE
9
10#include "lprefix.h"
11
12
13#include "lopcodes.h"
14
15
16/* ORDER OP */
17
18LUAI_DDEF const lu_byte luaP_opmodes[NUM_OPCODES] = {
19/*       MM OT IT T  A  mode		   opcode  */
20  opmode(0, 0, 0, 0, 1, iABC)		/* OP_MOVE */
21 ,opmode(0, 0, 0, 0, 1, iAsBx)		/* OP_LOADI */
22 ,opmode(0, 0, 0, 0, 1, iAsBx)		/* OP_LOADF */
23 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_LOADK */
24 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_LOADKX */
25 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_LOADFALSE */
26 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_LFALSESKIP */
27 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_LOADTRUE */
28 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_LOADNIL */
29 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_GETUPVAL */
30 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_SETUPVAL */
31 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_GETTABUP */
32 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_GETTABLE */
33 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_GETI */
34 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_GETFIELD */
35 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_SETTABUP */
36 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_SETTABLE */
37 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_SETI */
38 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_SETFIELD */
39 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_NEWTABLE */
40 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SELF */
41 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_ADDI */
42 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_ADDK */
43 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SUBK */
44 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_MULK */
45 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_MODK */
46 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_POWK */
47 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_DIVK */
48 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_IDIVK */
49 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BANDK */
50 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BORK */
51 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BXORK */
52 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SHRI */
53 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SHLI */
54 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_ADD */
55 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SUB */
56 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_MUL */
57 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_MOD */
58 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_POW */
59 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_DIV */
60 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_IDIV */
61 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BAND */
62 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BOR */
63 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BXOR */
64 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SHL */
65 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_SHR */
66 ,opmode(1, 0, 0, 0, 0, iABC)		/* OP_MMBIN */
67 ,opmode(1, 0, 0, 0, 0, iABC)		/* OP_MMBINI*/
68 ,opmode(1, 0, 0, 0, 0, iABC)		/* OP_MMBINK*/
69 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_UNM */
70 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_BNOT */
71 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_NOT */
72 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_LEN */
73 ,opmode(0, 0, 0, 0, 1, iABC)		/* OP_CONCAT */
74 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_CLOSE */
75 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_TBC */
76 ,opmode(0, 0, 0, 0, 0, isJ)		/* OP_JMP */
77 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_EQ */
78 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_LT */
79 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_LE */
80 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_EQK */
81 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_EQI */
82 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_LTI */
83 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_LEI */
84 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_GTI */
85 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_GEI */
86 ,opmode(0, 0, 0, 1, 0, iABC)		/* OP_TEST */
87 ,opmode(0, 0, 0, 1, 1, iABC)		/* OP_TESTSET */
88 ,opmode(0, 1, 1, 0, 1, iABC)		/* OP_CALL */
89 ,opmode(0, 1, 1, 0, 1, iABC)		/* OP_TAILCALL */
90 ,opmode(0, 0, 1, 0, 0, iABC)		/* OP_RETURN */
91 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_RETURN0 */
92 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_RETURN1 */
93 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_FORLOOP */
94 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_FORPREP */
95 ,opmode(0, 0, 0, 0, 0, iABx)		/* OP_TFORPREP */
96 ,opmode(0, 0, 0, 0, 0, iABC)		/* OP_TFORCALL */
97 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_TFORLOOP */
98 ,opmode(0, 0, 1, 0, 0, iABC)		/* OP_SETLIST */
99 ,opmode(0, 0, 0, 0, 1, iABx)		/* OP_CLOSURE */
100 ,opmode(0, 1, 0, 0, 1, iABC)		/* OP_VARARG */
101 ,opmode(0, 0, 1, 0, 1, iABC)		/* OP_VARARGPREP */
102 ,opmode(0, 0, 0, 0, 0, iAx)		/* OP_EXTRAARG */
103};
104
105