nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

detail

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2005-07-05 11:31:20 -03:00
parent 8efb44b5e0
commit ee1edd5734
2 changed files with 5 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lapi.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lapi.c,v 2.42 2005/05/31 14:25:18 roberto Exp roberto $ ** $Id: lapi.c,v 2.43 2005/05/31 14:34:02 roberto Exp roberto $
** Lua API ** Lua API
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -985,7 +985,7 @@ LUA_API void lua_concat (lua_State *L, int n) {
LUA_API lua_Alloc lua_getallocf (lua_State *L, void **ud) { LUA_API lua_Alloc lua_getallocf (lua_State *L, void **ud) {
*ud = G(L)->ud; if (ud) *ud = G(L)->ud;
return G(L)->frealloc; return G(L)->frealloc;
} }

7
lvm.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lvm.c,v 2.46 2005/05/31 14:25:18 roberto Exp roberto $ ** $Id: lvm.c,v 2.47 2005/06/13 14:15:22 roberto Exp roberto $
** Lua virtual machine ** Lua virtual machine
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -311,8 +311,8 @@ void luaV_concat (lua_State *L, int total, int last) {
} }
static StkId Arith (lua_State *L, StkId ra, const TValue *rb, static void Arith (lua_State *L, StkId ra, const TValue *rb,
const TValue *rc, TMS op) { const TValue *rc, TMS op) {
TValue tempb, tempc; TValue tempb, tempc;
const TValue *b, *c; const TValue *b, *c;
if ((b = luaV_tonumber(rb, &tempb)) != NULL && if ((b = luaV_tonumber(rb, &tempb)) != NULL &&
@@ -330,7 +330,6 @@ static StkId Arith (lua_State *L, StkId ra, const TValue *rb,
} }
else if (!call_binTM(L, rb, rc, ra, op)) else if (!call_binTM(L, rb, rc, ra, op))
luaG_aritherror(L, rb, rc); luaG_aritherror(L, rb, rc);
return L->base;
} }