diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2018-06-15 14:30:52 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2018-06-15 14:30:52 -0300 |
| commit | d406d3d05ffe8bc01d6416437963ce092cfc9772 (patch) | |
| tree | 76eb08db5aa34e5ce9c88cf3560f49e825183f91 /lapi.c | |
| parent | b6780ee41b1f5c120601a72b12d81e3ce71a8971 (diff) | |
| download | lua-github-d406d3d05ffe8bc01d6416437963ce092cfc9772.tar.gz | |
removed unused macros 'isstackindex'/'api_checkstackindex' +
macro 'api_checkvalidindex' (used only once) expanded and removed
Diffstat (limited to 'lapi.c')
| -rw-r--r-- | lapi.c | 12 |
1 files changed, 2 insertions, 10 deletions
@@ -1,5 +1,5 @@ /* -** $Id: lapi.c,v 2.291 2018/04/04 14:23:41 roberto Exp roberto $ +** $Id: lapi.c,v 2.292 2018/06/01 17:40:38 roberto Exp roberto $ ** Lua API ** See Copyright Notice in lua.h */ @@ -51,14 +51,6 @@ static const TValue nonvalidvaluep = {NILCONSTANT}; /* test for upvalue */ #define isupvalue(i) ((i) < LUA_REGISTRYINDEX) -/* test for valid but not pseudo index */ -#define isstackindex(i, o) (isvalid(o) && !ispseudo(i)) - -#define api_checkvalidindex(l,o) api_check(l, isvalid(o), "invalid index") - -#define api_checkstackindex(l, i, o) \ - api_check(l, isstackindex(i, o), "index not in the stack") - static TValue *index2value (lua_State *L, int idx) { CallInfo *ci = L->ci; @@ -233,7 +225,7 @@ LUA_API void lua_copy (lua_State *L, int fromidx, int toidx) { lua_lock(L); fr = index2value(L, fromidx); to = index2value(L, toidx); - api_checkvalidindex(L, to); + api_check(l, isvalid(to), "invalid index"); setobj(L, to, fr); if (isupvalue(toidx)) /* function upvalue? */ luaC_barrier(L, clCvalue(s2v(L->ci->func)), fr); |
