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