| 182 | |
| 183 | |
| 184 | static const char *findvararg (CallInfo *ci, int n, StkId *pos) { |
| 185 | if (clLvalue(s2v(ci->func))->p->is_vararg) { |
| 186 | int nextra = ci->u.l.nextraargs; |
| 187 | if (n >= -nextra) { /* 'n' is negative */ |
| 188 | *pos = ci->func - nextra - (n + 1); |
| 189 | return "(vararg)"; /* generic name for any vararg */ |
| 190 | } |
| 191 | } |
| 192 | return NULL; /* no such vararg */ |
| 193 | } |
| 194 | |
| 195 | |
| 196 | const char *luaG_findlocal (lua_State *L, CallInfo *ci, int n, StkId *pos) { |