| 112 | |
| 113 | |
| 114 | static int luaB_error (lua_State *L) { |
| 115 | int level = (int)luaL_optinteger(L, 2, 1); |
| 116 | lua_settop(L, 1); |
| 117 | if (lua_type(L, 1) == LUA_TSTRING && level > 0) { |
| 118 | luaL_where(L, level); /* add extra information */ |
| 119 | lua_pushvalue(L, 1); |
| 120 | lua_concat(L, 2); |
| 121 | } |
| 122 | return lua_error(L); |
| 123 | } |
| 124 | |
| 125 | |
| 126 | static int luaB_getmetatable (lua_State *L) { |
no test coverage detected