mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-12-24 19:36:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

avoid name colision (for alllua.c)

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2003-03-19 18:24:04 -03:00
parent 1a553f9199
commit abc304f9da
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ldebug.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ldebug.c,v 1.148 2003/03/18 12:24:38 roberto Exp roberto $
** $Id: ldebug.c,v 1.149 2003/03/18 12:50:04 roberto Exp roberto $
** Debug Interface
** See Copyright Notice in lua.h
*/
@ -197,7 +197,7 @@ static void info_tailcall (lua_State *L, lua_Debug *ar) {
}
static int getinfo (lua_State *L, const char *what, lua_Debug *ar,
static int auxgetinfo (lua_State *L, const char *what, lua_Debug *ar,
StkId f, CallInfo *ci) {
int status = 1;
for (; *what; what++) {
@ -242,13 +242,13 @@ LUA_API int lua_getinfo (lua_State *L, const char *what, lua_Debug *ar) {
StkId f = L->top - 1;
if (!ttisfunction(f))
luaG_runerror(L, "value for `lua_getinfo' is not a function");
status = getinfo(L, what + 1, ar, f, NULL);
status = auxgetinfo(L, what + 1, ar, f, NULL);
L->top--; /* pop function */
}
else if (ar->i_ci != 0) { /* no tail call? */
CallInfo *ci = L->base_ci + ar->i_ci;
lua_assert(ttisfunction(ci->base - 1));
status = getinfo(L, what, ar, ci->base - 1, ci);
status = auxgetinfo(L, what, ar, ci->base - 1, ci);
}
else
info_tailcall(L, ar);