diff options
-rw-r--r-- | lapi.c | 6 | ||||
-rw-r--r-- | ldebug.c | 4 | ||||
-rw-r--r-- | ltable.h | 6 | ||||
-rw-r--r-- | lvm.c | 4 |
4 files changed, 10 insertions, 10 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lapi.c,v 2.86 2009/07/15 17:57:03 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 2.87 2009/07/15 18:37:19 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 | */ |
@@ -562,7 +562,7 @@ LUA_API void lua_rawgeti (lua_State *L, int idx, int n) { | |||
562 | lua_lock(L); | 562 | lua_lock(L); |
563 | o = index2addr(L, idx); | 563 | o = index2addr(L, idx); |
564 | api_check(L, ttistable(o)); | 564 | api_check(L, ttistable(o)); |
565 | setobj2s(L, L->top, luaH_getnum(hvalue(o), n)); | 565 | setobj2s(L, L->top, luaH_getint(hvalue(o), n)); |
566 | api_incr_top(L); | 566 | api_incr_top(L); |
567 | lua_unlock(L); | 567 | lua_unlock(L); |
568 | } | 568 | } |
@@ -683,7 +683,7 @@ LUA_API void lua_rawseti (lua_State *L, int idx, int n) { | |||
683 | api_checknelems(L, 1); | 683 | api_checknelems(L, 1); |
684 | o = index2addr(L, idx); | 684 | o = index2addr(L, idx); |
685 | api_check(L, ttistable(o)); | 685 | api_check(L, ttistable(o)); |
686 | setobj2t(L, luaH_setnum(L, hvalue(o), n), L->top-1); | 686 | setobj2t(L, luaH_setint(L, hvalue(o), n), L->top-1); |
687 | luaC_barriert(L, hvalue(o), L->top-1); | 687 | luaC_barriert(L, hvalue(o), L->top-1); |
688 | L->top--; | 688 | L->top--; |
689 | lua_unlock(L); | 689 | lua_unlock(L); |
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 2.51 2009/06/01 19:09:26 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 2.52 2009/06/10 16:57:53 roberto Exp roberto $ |
3 | ** Debug Interface | 3 | ** Debug Interface |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -191,7 +191,7 @@ static void collectvalidlines (lua_State *L, Closure *f) { | |||
191 | sethvalue(L, L->top, t); | 191 | sethvalue(L, L->top, t); |
192 | incr_top(L); | 192 | incr_top(L); |
193 | for (i=0; i<f->l.p->sizelineinfo; i++) | 193 | for (i=0; i<f->l.p->sizelineinfo; i++) |
194 | setbvalue(luaH_setnum(L, t, lineinfo[i]), 1); | 194 | setbvalue(luaH_setint(L, t, lineinfo[i]), 1); |
195 | } | 195 | } |
196 | } | 196 | } |
197 | 197 | ||
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltable.h,v 2.10 2006/01/10 13:13:06 roberto Exp roberto $ | 2 | ** $Id: ltable.h,v 2.11 2006/07/11 15:53:29 roberto Exp roberto $ |
3 | ** Lua tables (hash) | 3 | ** Lua tables (hash) |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -18,8 +18,8 @@ | |||
18 | #define key2tval(n) (&(n)->i_key.tvk) | 18 | #define key2tval(n) (&(n)->i_key.tvk) |
19 | 19 | ||
20 | 20 | ||
21 | LUAI_FUNC const TValue *luaH_getnum (Table *t, int key); | 21 | LUAI_FUNC const TValue *luaH_getint (Table *t, int key); |
22 | LUAI_FUNC TValue *luaH_setnum (lua_State *L, Table *t, int key); | 22 | LUAI_FUNC TValue *luaH_setint (lua_State *L, Table *t, int key); |
23 | LUAI_FUNC const TValue *luaH_getstr (Table *t, TString *key); | 23 | LUAI_FUNC const TValue *luaH_getstr (Table *t, TString *key); |
24 | LUAI_FUNC TValue *luaH_setstr (lua_State *L, Table *t, TString *key); | 24 | LUAI_FUNC TValue *luaH_setstr (lua_State *L, Table *t, TString *key); |
25 | LUAI_FUNC const TValue *luaH_get (Table *t, const TValue *key); | 25 | LUAI_FUNC const TValue *luaH_get (Table *t, const TValue *key); |
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 2.94 2009/07/01 20:31:25 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 2.95 2009/07/15 18:38:16 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 | */ |
@@ -754,7 +754,7 @@ void luaV_execute (lua_State *L) { | |||
754 | luaH_resizearray(L, h, last); /* pre-alloc it at once */ | 754 | luaH_resizearray(L, h, last); /* pre-alloc it at once */ |
755 | for (; n > 0; n--) { | 755 | for (; n > 0; n--) { |
756 | TValue *val = ra+n; | 756 | TValue *val = ra+n; |
757 | setobj2t(L, luaH_setnum(L, h, last--), val); | 757 | setobj2t(L, luaH_setint(L, h, last--), val); |
758 | luaC_barriert(L, h, val); | 758 | luaC_barriert(L, h, val); |
759 | } | 759 | } |
760 | L->top = ci->top; /* correct top (in case of previous open call) */ | 760 | L->top = ci->top; /* correct top (in case of previous open call) */ |