| 4683 | |
| 4684 | |
| 4685 | static void collectvalidlines (lua_State *L, Closure *f) { |
| 4686 | if (f == NULL || f->c.isC) { |
| 4687 | setnilvalue(L->top); |
| 4688 | } |
| 4689 | else { |
| 4690 | Table *t = luaH_new(L, 0, 0); |
| 4691 | int *lineinfo = f->l.p->lineinfo; |
| 4692 | int i; |
| 4693 | for (i=0; i<f->l.p->sizelineinfo; i++) |
| 4694 | setbvalue(luaH_setnum(L, t, lineinfo[i]), 1); |
| 4695 | sethvalue(L, L->top, t); |
| 4696 | } |
| 4697 | incr_top(L); |
| 4698 | } |
| 4699 | |
| 4700 | |
| 4701 | static int auxgetinfo (lua_State *L, const char *what, lua_Debug *ar, |
no test coverage detected