aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2001-06-26 10:20:45 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2001-06-26 10:20:45 -0300
commit37f3a1c0452439bce1f5c2069ca015af148bf62f (patch)
tree0ad887fb08400103904dab1954695d28aece0500 /lapi.c
parent9559c111a32479794acc59fba2cbeab365a567f3 (diff)
downloadlua-37f3a1c0452439bce1f5c2069ca015af148bf62f.tar.gz
lua-37f3a1c0452439bce1f5c2069ca015af148bf62f.tar.bz2
lua-37f3a1c0452439bce1f5c2069ca015af148bf62f.zip
too much optimization to "break" keys in tables; keep them as TObjects...
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lapi.c b/lapi.c
index 31f11702..5b6e36e3 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 1.145 2001/06/15 19:16:41 roberto Exp roberto $ 2** $Id: lapi.c,v 1.146 2001/06/15 20:36:57 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*/
@@ -672,7 +672,7 @@ LUA_API int lua_next (lua_State *L, int index) {
672 api_check(L, ttype(t) == LUA_TTABLE); 672 api_check(L, ttype(t) == LUA_TTABLE);
673 n = luaH_next(L, hvalue(t), luaA_index(L, -1)); 673 n = luaH_next(L, hvalue(t), luaA_index(L, -1));
674 if (n) { 674 if (n) {
675 setkey2obj(L->top-1, n); 675 setobj(L->top-1, key(n));
676 setobj(L->top, val(n)); 676 setobj(L->top, val(n));
677 api_incr_top(L); 677 api_incr_top(L);
678 more = 1; 678 more = 1;
@@ -701,10 +701,10 @@ LUA_API int lua_getn (lua_State *L, int index) {
701 int i = hvalue(t)->size; 701 int i = hvalue(t)->size;
702 Node *nd = hvalue(t)->node; 702 Node *nd = hvalue(t)->node;
703 while (i--) { 703 while (i--) {
704 if (ttype_key(nd) == LUA_TNUMBER && 704 if (ttype(key(nd)) == LUA_TNUMBER &&
705 ttype(val(nd)) != LUA_TNIL && 705 ttype(val(nd)) != LUA_TNIL &&
706 nvalue_key(nd) > max) 706 nvalue(key(nd)) > max)
707 max = nvalue_key(nd); 707 max = nvalue(key(nd));
708 nd++; 708 nd++;
709 } 709 }
710 n = (int)max; 710 n = (int)max;