** Find a "name" for the constant 'c'. */
| 483 | ** Find a "name" for the constant 'c'. |
| 484 | */ |
| 485 | static const char *kname (const Proto *p, int index, const char **name) { |
| 486 | TValue *kvalue = &p->k[index]; |
| 487 | if (ttisstring(kvalue)) { |
| 488 | *name = getstr(tsvalue(kvalue)); |
| 489 | return "constant"; |
| 490 | } |
| 491 | else { |
| 492 | *name = "?"; |
| 493 | return NULL; |
| 494 | } |
| 495 | } |
| 496 | |
| 497 | |
| 498 | static const char *basicgetobjname (const Proto *p, int *ppc, int reg, |
no outgoing calls
no test coverage detected