Function luaD_seterrorobj

Source/Misc/lua/src/lua.c:5197–5214

void luaD_seterrorobj (lua_State *L, int errcode, StkId oldtop) {
switch (errcode) {
case LUA_ERRMEM: {
setsvalue2s(L, oldtop, luaS_newliteral(L, MEMERRMSG));
break;
}
case LUA_ERRERR: {
setsvalue2s(L, oldtop, luaS_newliteral(L, "error in error handling"));
break;
}
case LUA_ERRSYNTAX:
case LUA_ERRRUN: {
setobjs2s(L, oldtop, L->top - 1);  /* error message on current top */
break;
}
}
L->top = oldtop + 1;
}


static void restore_stack_limit (lua_State *L) {