| 257 | |
| 258 | |
| 259 | static void funcinfo (lua_Debug *ar, Closure *cl) { |
| 260 | if (!LuaClosure(cl)) { |
| 261 | ar->source = "=[C]"; |
| 262 | ar->srclen = LL("=[C]"); |
| 263 | ar->linedefined = -1; |
| 264 | ar->lastlinedefined = -1; |
| 265 | ar->what = "C"; |
| 266 | } |
| 267 | else { |
| 268 | const Proto *p = cl->l.p; |
| 269 | if (p->source) { |
| 270 | ar->source = getlstr(p->source, ar->srclen); |
| 271 | } |
| 272 | else { |
| 273 | ar->source = "=?"; |
| 274 | ar->srclen = LL("=?"); |
| 275 | } |
| 276 | ar->linedefined = p->linedefined; |
| 277 | ar->lastlinedefined = p->lastlinedefined; |
| 278 | ar->what = (ar->linedefined == 0) ? "main" : "Lua"; |
| 279 | } |
| 280 | luaO_chunkid(ar->short_src, ar->source, ar->srclen); |
| 281 | } |
| 282 | |
| 283 | |
| 284 | static int nextline (const Proto *p, int currentline, int pc) { |
no test coverage detected