| 5073 | |
| 5074 | |
| 5075 | void luaG_typeerror (lua_State *L, const TValue *o, const char *op) { |
| 5076 | const char *name = NULL; |
| 5077 | const char *t = luaT_typenames[ttype(o)]; |
| 5078 | const char *kind = (isinstack(L->ci, o)) ? |
| 5079 | getobjname(L, L->ci, cast_int(o - L->base), &name) : |
| 5080 | NULL; |
| 5081 | if (kind) |
| 5082 | luaG_runerror(L, "attempt to %s %s " LUA_QS " (a %s value)", |
| 5083 | op, kind, name, t); |
| 5084 | else |
| 5085 | luaG_runerror(L, "attempt to %s a %s value", op, t); |
| 5086 | } |
| 5087 | |
| 5088 | |
| 5089 | void luaG_concaterror (lua_State *L, StkId p1, StkId p2) { |
no test coverage detected