Function seterrorobj

src/Chain/libraries/glua/ldo.cpp:110–126

static void seterrorobj(lua_State *L, int errcode, StkId oldtop) {
    switch (errcode) {
    case LUA_ERRMEM: {  /* memory error? */
        setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */
        break;
    }
    case LUA_ERRERR: {
        setsvalue2s(L, oldtop, luaS_newliteral(L, "error in error handling"));
        break;
    }
    default: {
        setobjs2s(L, oldtop, L->top - 1);  /* error message on current top */
        break;
    }
    }
    L->top = oldtop + 1;
}


void luaD_throw(lua_State *L, int errcode) {