diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-02-25 18:07:26 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-02-25 18:07:26 -0300 |
commit | 6a853fcb8b9e333d768c739c36c99b144bbde607 (patch) | |
tree | 5645e5fbe3a43f15044591be30c5d4607cb7357c /lapi.c | |
parent | 31bea2190b25e5b6687d92d807af522378168bfa (diff) | |
download | lua-6a853fcb8b9e333d768c739c36c99b144bbde607.tar.gz lua-6a853fcb8b9e333d768c739c36c99b144bbde607.tar.bz2 lua-6a853fcb8b9e333d768c739c36c99b144bbde607.zip |
details (from lhf)
Diffstat (limited to 'lapi.c')
-rw-r--r-- | lapi.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lapi.c,v 1.37 1999/02/22 19:13:12 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 1.38 1999/02/23 14:57:28 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 | */ |
@@ -477,7 +477,7 @@ int luaA_next (Hash *t, int i) { | |||
477 | int lua_next (lua_Object o, int i) { | 477 | int lua_next (lua_Object o, int i) { |
478 | TObject *t = Address(o); | 478 | TObject *t = Address(o); |
479 | if (ttype(t) != LUA_T_ARRAY) | 479 | if (ttype(t) != LUA_T_ARRAY) |
480 | lua_error("API error: object is not a table in `lua_next'"); | 480 | lua_error("API error - object is not a table in `lua_next'"); |
481 | i = luaA_next(avalue(t), i); | 481 | i = luaA_next(avalue(t), i); |
482 | top2LC((i==0) ? 0 : 2); | 482 | top2LC((i==0) ? 0 : 2); |
483 | return i; | 483 | return i; |
@@ -620,7 +620,7 @@ static int checkfunc (TObject *o) | |||
620 | 620 | ||
621 | char *lua_getobjname (lua_Object o, char **name) | 621 | char *lua_getobjname (lua_Object o, char **name) |
622 | { /* try to find a name for given function */ | 622 | { /* try to find a name for given function */ |
623 | set_normalized(L->stack.top, Address(o)); /* to be accessed by "checkfunc */ | 623 | set_normalized(L->stack.top, Address(o)); /* to be accessed by "checkfunc" */ |
624 | if ((*name = luaT_travtagmethods(checkfunc)) != NULL) | 624 | if ((*name = luaT_travtagmethods(checkfunc)) != NULL) |
625 | return "tag-method"; | 625 | return "tag-method"; |
626 | else if ((*name = luaS_travsymbol(checkfunc)) != NULL) | 626 | else if ((*name = luaS_travsymbol(checkfunc)) != NULL) |