diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-08-07 13:17:41 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-08-07 13:17:41 -0300 |
| commit | 3135a6bbaba406fd9f1e97e0b9c8415e1ad32579 (patch) | |
| tree | d03a797b5a3bad7b83013f4c4ae7162423622476 | |
| parent | 95cbc402dc4f246d2eeff3b53afcd183b3a8ccb0 (diff) | |
| download | lua-3135a6bbaba406fd9f1e97e0b9c8415e1ad32579.tar.gz lua-3135a6bbaba406fd9f1e97e0b9c8415e1ad32579.tar.bz2 lua-3135a6bbaba406fd9f1e97e0b9c8415e1ad32579.zip | |
luaH_[gs]etnum renamed to luaH_[gs]etint (as they only accept integers,
not generic numbers)
| -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) */ |
