lua/src/ldo.c

84 static void seterrorobj (lua_State *L, int errcode, StkId oldtop) {
87       setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */
91       setsvalue2s(L, oldtop, luaS_newliteral(L, "error in error handling"));
95       setobjs2s(L, oldtop, L->top - 1);  /* error message on current top */
99   L->top = oldtop + 1;
462   StkId oldtop;
466   oldtop = restorestack(L, ci->extra);
467   luaF_close(L, oldtop);
468   seterrorobj(L, status, oldtop);
605     StkId oldtop = restorestack(L, old_top);
606     luaF_close(L, oldtop);  /* close possible pending closures */
607     seterrorobj(L, status, oldtop);