diff options
Diffstat (limited to 'lvm.c')
-rw-r--r-- | lvm.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 1.135 2000/09/11 17:38:42 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.136 2000/09/20 17:57:08 roberto Exp roberto $ |
3 | ** Lua virtual machine | 3 | ** Lua virtual machine |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -120,7 +120,7 @@ const TObject *luaV_gettable (lua_State *L, StkId t) { | |||
120 | ((tg = hvalue(t)->htag) == TAG_TABLE || /* with default tag? */ | 120 | ((tg = hvalue(t)->htag) == TAG_TABLE || /* with default tag? */ |
121 | ttype(luaT_getim(L, tg, IM_GETTABLE)) == TAG_NIL)) { /* or no TM? */ | 121 | ttype(luaT_getim(L, tg, IM_GETTABLE)) == TAG_NIL)) { /* or no TM? */ |
122 | /* do a primitive get */ | 122 | /* do a primitive get */ |
123 | const TObject *h = luaH_get(L, hvalue(t), t+1); | 123 | const TObject *h = luaH_get(L, hvalue(t), L->top-1); |
124 | /* result is no nil or there is no `index' tag method? */ | 124 | /* result is no nil or there is no `index' tag method? */ |
125 | if (ttype(h) != TAG_NIL || | 125 | if (ttype(h) != TAG_NIL || |
126 | (ttype(im=luaT_getim(L, tg, IM_INDEX)) == TAG_NIL)) | 126 | (ttype(im=luaT_getim(L, tg, IM_INDEX)) == TAG_NIL)) |