aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2003-03-19 18:24:04 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2003-03-19 18:24:04 -0300
commitabc304f9da5b29fd36cd09a01fb6977758e0a640 (patch)
tree0011e3e2cf6286e3db4ace3b0854e6971d4b323e
parent1a553f9199f99bd529c542ef3be60b7a48f4ff2a (diff)
downloadlua-abc304f9da5b29fd36cd09a01fb6977758e0a640.tar.gz
lua-abc304f9da5b29fd36cd09a01fb6977758e0a640.tar.bz2
lua-abc304f9da5b29fd36cd09a01fb6977758e0a640.zip
avoid name colision (for alllua.c)
-rw-r--r--ldebug.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/ldebug.c b/ldebug.c
index be96e666..d23d9028 100644
--- a/ldebug.c
+++ b/ldebug.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ldebug.c,v 1.148 2003/03/18 12:24:38 roberto Exp roberto $ 2** $Id: ldebug.c,v 1.149 2003/03/18 12:50:04 roberto Exp roberto $
3** Debug Interface 3** Debug Interface
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -197,7 +197,7 @@ static void info_tailcall (lua_State *L, lua_Debug *ar) {
197} 197}
198 198
199 199
200static int getinfo (lua_State *L, const char *what, lua_Debug *ar, 200static int auxgetinfo (lua_State *L, const char *what, lua_Debug *ar,
201 StkId f, CallInfo *ci) { 201 StkId f, CallInfo *ci) {
202 int status = 1; 202 int status = 1;
203 for (; *what; what++) { 203 for (; *what; what++) {
@@ -242,13 +242,13 @@ LUA_API int lua_getinfo (lua_State *L, const char *what, lua_Debug *ar) {
242 StkId f = L->top - 1; 242 StkId f = L->top - 1;
243 if (!ttisfunction(f)) 243 if (!ttisfunction(f))
244 luaG_runerror(L, "value for `lua_getinfo' is not a function"); 244 luaG_runerror(L, "value for `lua_getinfo' is not a function");
245 status = getinfo(L, what + 1, ar, f, NULL); 245 status = auxgetinfo(L, what + 1, ar, f, NULL);
246 L->top--; /* pop function */ 246 L->top--; /* pop function */
247 } 247 }
248 else if (ar->i_ci != 0) { /* no tail call? */ 248 else if (ar->i_ci != 0) { /* no tail call? */
249 CallInfo *ci = L->base_ci + ar->i_ci; 249 CallInfo *ci = L->base_ci + ar->i_ci;
250 lua_assert(ttisfunction(ci->base - 1)); 250 lua_assert(ttisfunction(ci->base - 1));
251 status = getinfo(L, what, ar, ci->base - 1, ci); 251 status = auxgetinfo(L, what, ar, ci->base - 1, ci);
252 } 252 }
253 else 253 else
254 info_tailcall(L, ar); 254 info_tailcall(L, ar);