diff options
Diffstat (limited to 'lapi.c')
| -rw-r--r-- | lapi.c | 7 |
1 files changed, 4 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lapi.c,v 1.93 2000/08/31 21:01:43 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 1.94 2000/09/05 19:33:32 roberto Exp roberto $ |
| 3 | ** Lua API | 3 | ** Lua API |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -30,7 +30,7 @@ const char lua_ident[] = "$Lua: " LUA_VERSION " " LUA_COPYRIGHT " $\n" | |||
| 30 | 30 | ||
| 31 | #define Index(L,i) ((i) >= 0 ? (L->Cbase+((i)-1)) : (L->top+(i))) | 31 | #define Index(L,i) ((i) >= 0 ? (L->Cbase+((i)-1)) : (L->top+(i))) |
| 32 | 32 | ||
| 33 | #define api_incr_top(L) (++L->top) | 33 | #define api_incr_top(L) incr_top |
| 34 | 34 | ||
| 35 | 35 | ||
| 36 | 36 | ||
| @@ -250,7 +250,8 @@ void lua_pushusertag (lua_State *L, void *u, int tag) { /* ORDER LUA_T */ | |||
| 250 | void lua_getglobal (lua_State *L, const char *name) { | 250 | void lua_getglobal (lua_State *L, const char *name) { |
| 251 | StkId top = L->top; | 251 | StkId top = L->top; |
| 252 | *top = *luaV_getglobal(L, luaS_new(L, name)); | 252 | *top = *luaV_getglobal(L, luaS_new(L, name)); |
| 253 | L->top = top+1; | 253 | L->top = top; |
| 254 | api_incr_top(L); | ||
| 254 | } | 255 | } |
| 255 | 256 | ||
| 256 | 257 | ||
