aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2005-04-04 15:12:51 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2005-04-04 15:12:51 -0300
commit0316308c0d8ee9834641dacf81b43bcfd396095d (patch)
treef2a66cb6080fe432ede5d17911d3766d37ad5fb6 /lapi.c
parent409ee99900216d4a64a9a7029099bc7ae67a4d8e (diff)
downloadlua-0316308c0d8ee9834641dacf81b43bcfd396095d.tar.gz
lua-0316308c0d8ee9834641dacf81b43bcfd396095d.tar.bz2
lua-0316308c0d8ee9834641dacf81b43bcfd396095d.zip
removed dirt optimizations that gave small gains
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 b336014f..b1b13124 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 2.35 2005/03/21 18:12:21 roberto Exp roberto $ 2** $Id: lapi.c,v 2.36 2005/03/22 16:04:29 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*/
@@ -526,7 +526,7 @@ LUA_API void lua_gettable (lua_State *L, int idx) {
526 lua_lock(L); 526 lua_lock(L);
527 t = index2adr(L, idx); 527 t = index2adr(L, idx);
528 api_checkvalidindex(L, t); 528 api_checkvalidindex(L, t);
529 luaV_gettable(L, t, L->top - 1, L->top - 1, NULL); 529 luaV_gettable(L, t, L->top - 1, L->top - 1);
530 lua_unlock(L); 530 lua_unlock(L);
531} 531}
532 532
@@ -538,7 +538,7 @@ LUA_API void lua_getfield (lua_State *L, int idx, const char *k) {
538 t = index2adr(L, idx); 538 t = index2adr(L, idx);
539 api_checkvalidindex(L, t); 539 api_checkvalidindex(L, t);
540 setsvalue(L, &key, luaS_new(L, k)); 540 setsvalue(L, &key, luaS_new(L, k));
541 luaV_gettable(L, t, &key, L->top, NULL); 541 luaV_gettable(L, t, &key, L->top);
542 api_incr_top(L); 542 api_incr_top(L);
543 lua_unlock(L); 543 lua_unlock(L);
544} 544}
@@ -632,7 +632,7 @@ LUA_API void lua_settable (lua_State *L, int idx) {
632 api_checknelems(L, 2); 632 api_checknelems(L, 2);
633 t = index2adr(L, idx); 633 t = index2adr(L, idx);
634 api_checkvalidindex(L, t); 634 api_checkvalidindex(L, t);
635 luaV_settable(L, t, L->top - 2, L->top - 1, NULL); 635 luaV_settable(L, t, L->top - 2, L->top - 1);
636 L->top -= 2; /* pop index and value */ 636 L->top -= 2; /* pop index and value */
637 lua_unlock(L); 637 lua_unlock(L);
638} 638}
@@ -646,7 +646,7 @@ LUA_API void lua_setfield (lua_State *L, int idx, const char *k) {
646 t = index2adr(L, idx); 646 t = index2adr(L, idx);
647 api_checkvalidindex(L, t); 647 api_checkvalidindex(L, t);
648 setsvalue(L, &key, luaS_new(L, k)); 648 setsvalue(L, &key, luaS_new(L, k));
649 luaV_settable(L, t, &key, L->top - 1, NULL); 649 luaV_settable(L, t, &key, L->top - 1);
650 L->top--; /* pop value */ 650 L->top--; /* pop value */
651 lua_unlock(L); 651 lua_unlock(L);
652} 652}