1 files changed, 1 insertions, 50 deletions
diff --git a/ldebug.c b/ldebug.c
index 473d63f5..3e73d374 100644
--- a/ldebug.c
+++ b/ldebug.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.c,v 1.84 2001/06/26 13:20:45 roberto Exp roberto $
+** $Id: ldebug.c,v 1.85 2001/06/28 14:57:17 roberto Exp roberto $
 ** Debug Interface
 ** See Copyright Notice in lua.h
 */
@@ -563,52 +563,3 @@ void luaG_ordererror (lua_State *L, const TObject *p1, const TObject *p2) {
    luaO_verror(L, l_s("attempt to compare %.10s with %.10s"), t1, t2);
 }
-#define opmode(t,a,b,c,sa,k,m) (((t)<<OpModeT) | \
-   ((b)<<OpModeBreg) | ((c)<<OpModeCreg) | \
-   ((sa)<<OpModesetA) | ((k)<<OpModeK) | (m))
-const lu_byte luaG_opmodes[] = {
-/*       T J B C sA K mode                 opcode    */
-  opmode(0,0,1,0, 1,0,iABC),            /* OP_MOVE */
-  opmode(0,0,0,0, 1,1,iABc),            /* OP_LOADK */
-  opmode(0,0,0,0, 1,0,iAsBc),           /* OP_LOADINT */
-  opmode(0,0,1,0, 1,0,iABC),            /* OP_LOADNIL */
-  opmode(0,0,0,0, 1,0,iABc),            /* OP_LOADUPVAL */
-  opmode(0,0,0,0, 1,1,iABc),            /* OP_GETGLOBAL */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_GETTABLE */
-  opmode(0,0,0,0, 0,1,iABc),            /* OP_SETGLOBAL */
-  opmode(0,0,1,1, 0,0,iABC),            /* OP_SETTABLE */
-  opmode(0,0,0,0, 1,0,iABc),            /* OP_NEWTABLE */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_SELF */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_ADD */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_SUB */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_MUL */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_DIV */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_POW */
-  opmode(0,0,1,0, 1,0,iABC),            /* OP_UNM */
-  opmode(0,0,1,0, 1,0,iABC),            /* OP_NOT */
-  opmode(0,0,1,1, 1,0,iABC),            /* OP_CONCAT */
-  opmode(0,1,0,0, 0,0,iAsBc),           /* OP_JMP */
-  opmode(0,1,0,0, 0,0,iAsBc),           /* OP_CJMP */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTEQ */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTNE */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTLT */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTLE */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTGT */
-  opmode(1,0,0,1, 0,0,iABC),            /* OP_TESTGE */
-  opmode(1,0,1,0, 1,0,iABC),            /* OP_TESTT */
-  opmode(1,0,1,0, 1,0,iABC),            /* OP_TESTF */
-  opmode(0,0,0,0, 1,0,iAsBc),           /* OP_NILJMP */
-  opmode(0,0,0,0, 0,0,iABC),            /* OP_CALL */
-  opmode(0,0,0,0, 0,0,iABC),            /* OP_RETURN */
-  opmode(0,0,0,0, 0,0,iAsBc),           /* OP_FORPREP */
-  opmode(0,0,0,0, 0,0,iAsBc),           /* OP_FORLOOP */
-  opmode(0,1,0,0, 0,0,iAsBc),           /* OP_TFORPREP */
-  opmode(0,1,0,0, 0,0,iAsBc),           /* OP_TFORLOOP */
-  opmode(0,0,0,0, 0,0,iABc),            /* OP_SETLIST */
-  opmode(0,0,0,0, 0,0,iABc),            /* OP_SETLIST0 */
-  opmode(0,0,0,0, 0,0,iABc)             /* OP_CLOSURE */
-};

diff --git a/ldebug.c b/ldebug.c index 473d63f5..3e73d374 100644 --- a/ldebug.c +++ b/ldebug.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: ldebug.c,v 1.84 2001/06/26 13:20:45 roberto Exp roberto $	2	** $Id: ldebug.c,v 1.85 2001/06/28 14:57:17 roberto Exp roberto $
3	** Debug Interface	3	** Debug Interface
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -563,52 +563,3 @@ void luaG_ordererror (lua_State L, const TObject p1, const TObject *p2) {
563	luaO_verror(L, l_s("attempt to compare %.10s with %.10s"), t1, t2);	563	luaO_verror(L, l_s("attempt to compare %.10s with %.10s"), t1, t2);
564	}	564	}
565		565
566
567
568	#define opmode(t,a,b,c,sa,k,m) (((t)<<OpModeT) \| \
569	((b)<<OpModeBreg) \| ((c)<<OpModeCreg) \| \
570	((sa)<<OpModesetA) \| ((k)<<OpModeK) \| (m))
571
572
573	const lu_byte luaG_opmodes[] = {
574	/* T J B C sA K mode opcode */
575	opmode(0,0,1,0, 1,0,iABC), /* OP_MOVE */
576	opmode(0,0,0,0, 1,1,iABc), /* OP_LOADK */
577	opmode(0,0,0,0, 1,0,iAsBc), /* OP_LOADINT */
578	opmode(0,0,1,0, 1,0,iABC), /* OP_LOADNIL */
579	opmode(0,0,0,0, 1,0,iABc), /* OP_LOADUPVAL */
580	opmode(0,0,0,0, 1,1,iABc), /* OP_GETGLOBAL */
581	opmode(0,0,1,1, 1,0,iABC), /* OP_GETTABLE */
582	opmode(0,0,0,0, 0,1,iABc), /* OP_SETGLOBAL */
583	opmode(0,0,1,1, 0,0,iABC), /* OP_SETTABLE */
584	opmode(0,0,0,0, 1,0,iABc), /* OP_NEWTABLE */
585	opmode(0,0,1,1, 1,0,iABC), /* OP_SELF */
586	opmode(0,0,1,1, 1,0,iABC), /* OP_ADD */
587	opmode(0,0,1,1, 1,0,iABC), /* OP_SUB */
588	opmode(0,0,1,1, 1,0,iABC), /* OP_MUL */
589	opmode(0,0,1,1, 1,0,iABC), /* OP_DIV */
590	opmode(0,0,1,1, 1,0,iABC), /* OP_POW */
591	opmode(0,0,1,0, 1,0,iABC), /* OP_UNM */
592	opmode(0,0,1,0, 1,0,iABC), /* OP_NOT */
593	opmode(0,0,1,1, 1,0,iABC), /* OP_CONCAT */
594	opmode(0,1,0,0, 0,0,iAsBc), /* OP_JMP */
595	opmode(0,1,0,0, 0,0,iAsBc), /* OP_CJMP */
596	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTEQ */
597	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTNE */
598	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTLT */
599	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTLE */
600	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTGT */
601	opmode(1,0,0,1, 0,0,iABC), /* OP_TESTGE */
602	opmode(1,0,1,0, 1,0,iABC), /* OP_TESTT */
603	opmode(1,0,1,0, 1,0,iABC), /* OP_TESTF */
604	opmode(0,0,0,0, 1,0,iAsBc), /* OP_NILJMP */
605	opmode(0,0,0,0, 0,0,iABC), /* OP_CALL */
606	opmode(0,0,0,0, 0,0,iABC), /* OP_RETURN */
607	opmode(0,0,0,0, 0,0,iAsBc), /* OP_FORPREP */
608	opmode(0,0,0,0, 0,0,iAsBc), /* OP_FORLOOP */
609	opmode(0,1,0,0, 0,0,iAsBc), /* OP_TFORPREP */
610	opmode(0,1,0,0, 0,0,iAsBc), /* OP_TFORLOOP */
611	opmode(0,0,0,0, 0,0,iABc), /* OP_SETLIST */
612	opmode(0,0,0,0, 0,0,iABc), /* OP_SETLIST0 */
613	opmode(0,0,0,0, 0,0,iABc) /* OP_CLOSURE */
614	};