| 565 | |
| 566 | |
| 567 | void luaG_typeerror (lua_State *L, const TValue *o, const char *op) { |
| 568 | const char *name = NULL; |
| 569 | const char *t = luaT_typenames[ttype(o)]; |
| 570 | const char *kind = (isinstack(L->ci, o)) ? |
| 571 | getobjname(L, L->ci, cast_int(o - L->base), &name) : |
| 572 | NULL; |
| 573 | if (kind) |
| 574 | luaG_runerror(L, "attempt to %s %s " LUA_QS " (a %s value)", |
| 575 | op, kind, name, t); |
| 576 | else |
| 577 | luaG_runerror(L, "attempt to %s a %s value", op, t); |
| 578 | } |
| 579 | |
| 580 | |
| 581 | void luaG_concaterror (lua_State *L, StkId p1, StkId p2) { |
no test coverage detected