| 151 | |
| 152 | |
| 153 | static void seterrorobj (lua_State *L, int errcode, StkId oldtop) { |
| 154 | switch (errcode) { |
| 155 | case LUA_ERRMEM: { /* memory error? */ |
| 156 | setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */ |
| 157 | break; |
| 158 | } |
| 159 | case LUA_ERRERR: { |
| 160 | setsvalue2s(L, oldtop, luaS_newliteral(L, "error in error handling")); |
| 161 | break; |
| 162 | } |
| 163 | default: { |
| 164 | setobjs2s(L, oldtop, L->top - 1); /* error message on current top */ |
| 165 | break; |
| 166 | } |
| 167 | } |
| 168 | L->top = oldtop + 1; |
| 169 | } |
| 170 | |
| 171 | |
| 172 | l_noret luaD_throw (lua_State *L, int errcode) { |
no outgoing calls
no test coverage detected