|
@@ -1,5 +1,5 @@
|
|
|
/*
|
|
|
-** $Id: lvm.c,v 2.118 2010/05/12 20:31:33 roberto Exp roberto $
|
|
|
+** $Id: lvm.c,v 2.119 2010/05/12 20:40:35 roberto Exp roberto $
|
|
|
** Lua virtual machine
|
|
|
** See Copyright Notice in lua.h
|
|
|
*/
|
|
@@ -439,6 +439,7 @@ void luaV_finishOp (lua_State *L) {
|
|
|
else { Protect(luaV_arith(L, ra, rb, rc, tm)); } }
|
|
|
|
|
|
|
|
|
+#define vmdispatch(o) switch(o)
|
|
|
#define vmcase(l,b) case l: {b} break;
|
|
|
|
|
|
void luaV_execute (lua_State *L) {
|
|
@@ -464,7 +465,7 @@ void luaV_execute (lua_State *L) {
|
|
|
ra = RA(i);
|
|
|
lua_assert(base == ci->u.l.base);
|
|
|
lua_assert(base <= L->top && L->top < L->stack + L->stacksize);
|
|
|
- switch (GET_OPCODE(i)) {
|
|
|
+ vmdispatch (GET_OPCODE(i)) {
|
|
|
vmcase(OP_MOVE,
|
|
|
setobjs2s(L, ra, RB(i));
|
|
|
)
|