mirror of https://github.com/rusefi/lua.git
panic mode does not reset stack (so that panic function can gather
debug information from it)
This commit is contained in:
parent
a1d0e1a11a
commit
2b579b4b83
15
ldo.c
15
ldo.c
|
@ -1,5 +1,5 @@
|
||||||
/*
|
/*
|
||||||
** $Id: ldo.c,v 2.50 2008/10/30 15:39:30 roberto Exp roberto $
|
** $Id: ldo.c,v 2.51 2008/11/06 12:43:51 roberto Exp roberto $
|
||||||
** Stack and Call structure of Lua
|
** Stack and Call structure of Lua
|
||||||
** See Copyright Notice in lua.h
|
** See Copyright Notice in lua.h
|
||||||
*/
|
*/
|
||||||
|
@ -78,18 +78,6 @@ static void restore_stack_limit (lua_State *L) {
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
static void resetstack (lua_State *L, int status) {
|
|
||||||
L->ci = L->base_ci;
|
|
||||||
L->base = L->ci->base;
|
|
||||||
luaF_close(L, L->base); /* close possible pending closures */
|
|
||||||
luaD_seterrorobj(L, status, L->base);
|
|
||||||
L->allowhook = 1;
|
|
||||||
restore_stack_limit(L);
|
|
||||||
L->errfunc = 0;
|
|
||||||
L->errorJmp = NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void luaD_throw (lua_State *L, int errcode) {
|
void luaD_throw (lua_State *L, int errcode) {
|
||||||
if (L->errorJmp) {
|
if (L->errorJmp) {
|
||||||
L->errorJmp->status = errcode;
|
L->errorJmp->status = errcode;
|
||||||
|
@ -98,7 +86,6 @@ void luaD_throw (lua_State *L, int errcode) {
|
||||||
else {
|
else {
|
||||||
L->status = cast_byte(errcode);
|
L->status = cast_byte(errcode);
|
||||||
if (G(L)->panic) {
|
if (G(L)->panic) {
|
||||||
resetstack(L, errcode);
|
|
||||||
lua_unlock(L);
|
lua_unlock(L);
|
||||||
G(L)->panic(L);
|
G(L)->panic(L);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue