mirror of
https://github.com/lua/lua
synced 2024-12-24 03:16:50 +03:00
avoid name colision (for alllua.c)
This commit is contained in:
parent
1a553f9199
commit
abc304f9da
8
ldebug.c
8
ldebug.c
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user