2
0
Эх сурвалжийг харах

avoid name colision (for alllua.c)

Roberto Ierusalimschy 22 жил өмнө
parent
commit
abc304f9da
1 өөрчлөгдсөн 4 нэмэгдсэн , 4 устгасан
  1. 4 4
      ldebug.c

+ 4 - 4
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);