Function luaD_throw

src/Chain/libraries/glua/ldo.cpp:129–161

void luaD_throw(lua_State *L, int errcode) {
    if (L->errorJmp) {  // thread has an error handler?
        L->errorJmp->status = errcode;  // set status
        LUAI_THROW(L, L->errorJmp);  // jump to it
    }
    else {  // thread has no error handler 
        global_State *g = G(L);
        L->status = cast_byte(errcode);  // mark it as dead 
        if (g->mainthread->errorJmp) {  // main thread has a handler? 
            setobjs2s(L, g->mainthread->top++, L->top - 1);  // copy error obj.
            luaD_throw(g->mainthread, errcode);  // re-throw in main thread
        }
        else {  // no handler at all; abort
            std::string errmsg;
            if (g->panic) {  // panic function?
                seterrorobj(L, errcode, L->top);  // assume EXTRA_STACK
                if (L->ci->top < L->top)
                    L->ci->top = L->top;  // pushing msg. can break this invariant
                lua_unlock(L);
                errmsg = geterrorobjstr(L, errcode);
                g->panic(L);  // call panic function (last chance to jump out)
            }
            else
            {
                errmsg = "not found global function";
            }
            // abort();
            global_glua_chain_api->throw_exception(L, THINKYOUNG_API_SIMPLE_ERROR, errmsg.c_str());
            thinkyoung::lua::lib::notify_lua_state_stop(L);
            L->force_stopping = true;
        }
    }
}


int luaD_rawrunprotected(lua_State *L, Pfunc f, void *ud) {