aboutsummaryrefslogtreecommitdiffstats
path: root/package/lua/patches/300-opcode_performance.patch
diff options
context:
space:
mode:
authorJo-Philipp Wich <jow@openwrt.org>2012-10-10 17:53:46 +0000
committerJo-Philipp Wich <jow@openwrt.org>2012-10-10 17:53:46 +0000
commit109cf29629e6527898e8e54d756753380c2ba864 (patch)
tree5fed569de06b4be87bba5d1a50474f3a335f76f5 /package/lua/patches/300-opcode_performance.patch
parent5bb789340eba2b8def003130c9b7a97651259abb (diff)
downloadupstream-109cf29629e6527898e8e54d756753380c2ba864.tar.gz
upstream-109cf29629e6527898e8e54d756753380c2ba864.tar.bz2
upstream-109cf29629e6527898e8e54d756753380c2ba864.zip
lua: update to v5.1.5, refresh patches
SVN-Revision: 33707
Diffstat (limited to 'package/lua/patches/300-opcode_performance.patch')
-rw-r--r--package/lua/patches/300-opcode_performance.patch32
1 files changed, 16 insertions, 16 deletions
diff --git a/package/lua/patches/300-opcode_performance.patch b/package/lua/patches/300-opcode_performance.patch
index e870a25f42..5fbb87388a 100644
--- a/package/lua/patches/300-opcode_performance.patch
+++ b/package/lua/patches/300-opcode_performance.patch
@@ -10,7 +10,7 @@
/*
* If 'obj' is a string, it is tried to be interpreted as a number.
-@@ -562,12 +565,63 @@ static inline int arith_mode( const TVal
+@@ -566,12 +569,63 @@ static inline int arith_mode( const TVal
ARITH_OP1_END
#endif
@@ -74,7 +74,7 @@
reentry: /* entry point */
lua_assert(isLua(L->ci));
pc = L->savedpc;
-@@ -592,33 +646,33 @@ void luaV_execute (lua_State *L, int nex
+@@ -596,33 +650,33 @@ void luaV_execute (lua_State *L, int nex
lua_assert(base == L->base && L->base == L->ci->base);
lua_assert(base <= L->top && L->top <= L->stack + L->stacksize);
lua_assert(L->top == L->ci->top || luaG_checkopenop(i));
@@ -115,7 +115,7 @@
TValue g;
TValue *rb = KBx(i);
sethvalue(L, &g, cl->env);
-@@ -626,88 +680,88 @@ void luaV_execute (lua_State *L, int nex
+@@ -630,88 +684,88 @@ void luaV_execute (lua_State *L, int nex
Protect(luaV_gettable(L, &g, rb, ra));
continue;
}
@@ -219,7 +219,7 @@
const TValue *rb = RB(i);
switch (ttype(rb)) {
case LUA_TTABLE: {
-@@ -727,18 +781,18 @@ void luaV_execute (lua_State *L, int nex
+@@ -731,18 +785,18 @@ void luaV_execute (lua_State *L, int nex
}
continue;
}
@@ -241,7 +241,7 @@
TValue *rb = RKB(i);
TValue *rc = RKC(i);
Protect(
-@@ -748,7 +802,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -752,7 +806,7 @@ void luaV_execute (lua_State *L, int nex
pc++;
continue;
}
@@ -250,7 +250,7 @@
Protect(
if (luaV_lessthan(L, RKB(i), RKC(i)) == GETARG_A(i))
dojump(L, pc, GETARG_sBx(*pc));
-@@ -756,7 +810,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -760,7 +814,7 @@ void luaV_execute (lua_State *L, int nex
pc++;
continue;
}
@@ -259,7 +259,7 @@
Protect(
if (lessequal(L, RKB(i), RKC(i)) == GETARG_A(i))
dojump(L, pc, GETARG_sBx(*pc));
-@@ -764,13 +818,13 @@ void luaV_execute (lua_State *L, int nex
+@@ -768,13 +822,13 @@ void luaV_execute (lua_State *L, int nex
pc++;
continue;
}
@@ -275,7 +275,7 @@
TValue *rb = RB(i);
if (l_isfalse(rb) != GETARG_C(i)) {
setobjs2s(L, ra, rb);
-@@ -779,7 +833,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -783,7 +837,7 @@ void luaV_execute (lua_State *L, int nex
pc++;
continue;
}
@@ -284,7 +284,7 @@
int b = GETARG_B(i);
int nresults = GETARG_C(i) - 1;
if (b != 0) L->top = ra+b; /* else previous instruction set top */
-@@ -800,7 +854,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -804,7 +858,7 @@ void luaV_execute (lua_State *L, int nex
}
}
}
@@ -293,7 +293,7 @@
int b = GETARG_B(i);
if (b != 0) L->top = ra+b; /* else previous instruction set top */
L->savedpc = pc;
-@@ -832,7 +886,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -836,7 +890,7 @@ void luaV_execute (lua_State *L, int nex
}
}
}
@@ -302,7 +302,7 @@
int b = GETARG_B(i);
if (b != 0) L->top = ra+b-1;
if (L->openupval) luaF_close(L, base);
-@@ -847,7 +901,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -851,7 +905,7 @@ void luaV_execute (lua_State *L, int nex
goto reentry;
}
}
@@ -311,7 +311,7 @@
/* If start,step and limit are all integers, we don't need to check
* against overflow in the looping.
*/
-@@ -875,7 +929,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -879,7 +933,7 @@ void luaV_execute (lua_State *L, int nex
}
continue;
}
@@ -320,7 +320,7 @@
const TValue *init = ra;
const TValue *plimit = ra+1;
const TValue *pstep = ra+2;
-@@ -898,7 +952,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -902,7 +956,7 @@ void luaV_execute (lua_State *L, int nex
dojump(L, pc, GETARG_sBx(i));
continue;
}
@@ -329,7 +329,7 @@
StkId cb = ra + 3; /* call base */
setobjs2s(L, cb+2, ra+2);
setobjs2s(L, cb+1, ra+1);
-@@ -914,7 +968,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -918,7 +972,7 @@ void luaV_execute (lua_State *L, int nex
pc++;
continue;
}
@@ -338,7 +338,7 @@
int n = GETARG_B(i);
int c = GETARG_C(i);
int last;
-@@ -936,11 +990,11 @@ void luaV_execute (lua_State *L, int nex
+@@ -940,11 +994,11 @@ void luaV_execute (lua_State *L, int nex
}
continue;
}
@@ -352,7 +352,7 @@
Proto *p;
Closure *ncl;
int nup, j;
-@@ -960,7 +1014,7 @@ void luaV_execute (lua_State *L, int nex
+@@ -964,7 +1018,7 @@ void luaV_execute (lua_State *L, int nex
Protect(luaC_checkGC(L));
continue;
}