100   lua_Debug ar;  in db_getinfo()  local
105     if (!lua_getstack(L1, (int)lua_tointeger(L, arg+1), &ar)) {  in db_getinfo()
118   if (!lua_getinfo(L1, options, &ar))  in db_getinfo()
122     settabss(L, "source", ar.source);  in db_getinfo()
123     settabss(L, "short_src", ar.short_src);  in db_getinfo()
124     settabsi(L, "linedefined", ar.linedefined);  in db_getinfo()
125     settabsi(L, "lastlinedefined", ar.lastlinedefined);  in db_getinfo()
126     settabss(L, "what", ar.what);  in db_getinfo()
129     settabsi(L, "currentline", ar.currentline);  in db_getinfo()
131     settabsi(L, "nups", ar.nups);  in db_getinfo()
133     settabss(L, "name", ar.name);  in db_getinfo()
134     settabss(L, "namewhat", ar.namewhat);  in db_getinfo()
147   lua_Debug ar;  in db_getlocal()  local
149   if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar))  /* out of range? */  in db_getlocal()
151   name = lua_getlocal(L1, &ar, luaL_checkint(L, arg+2));  in db_getlocal()
168   lua_Debug ar;  in db_setlocal()  local
169   if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar))  /* out of range? */  in db_setlocal()
174   lua_pushstring(L, lua_setlocal(L1, &ar, luaL_checkint(L, arg+2)));  in db_setlocal()
207 static void hookf (lua_State *L, lua_Debug *ar) {  in hookf()  argument
215     lua_pushstring(L, hooknames[(int)ar->event]);  in hookf()
216     if (ar->currentline >= 0)  in hookf()
217       lua_pushinteger(L, ar->currentline);  in hookf()
219     lua_assert(lua_getinfo(L, "lS", ar));  in hookf()
327   lua_Debug ar;  in db_errorfb()  local
339   while (lua_getstack(L1, level++, &ar)) {  in db_errorfb()
342       if (!lua_getstack(L1, level+LEVELS2, &ar))  in db_errorfb()
346         while (lua_getstack(L1, level+LEVELS2, &ar))  /* find last levels */  in db_errorfb()
353     lua_getinfo(L1, "Snl", &ar);  in db_errorfb()
354     lua_pushfstring(L, "%s:", ar.short_src);  in db_errorfb()
355     if (ar.currentline > 0)  in db_errorfb()
356       lua_pushfstring(L, "%d:", ar.currentline);  in db_errorfb()
357     if (*ar.namewhat != '\0')  /* is there a name? */  in db_errorfb()
358         lua_pushfstring(L, " in function " LUA_QS, ar.name);  in db_errorfb()
360       if (*ar.what == 'm')  /* main? */  in db_errorfb()
362       else if (*ar.what == 'C' || *ar.what == 't')  in db_errorfb()
366                            ar.short_src, ar.linedefined);  in db_errorfb()