mirror of https://github.com/rusefi/lua.git
debug state is restored after a dofile/dostring
This commit is contained in:
parent
b5cd7d426f
commit
21107d7c2c
4
ldo.c
4
ldo.c
|
@ -1,5 +1,5 @@
|
||||||
/*
|
/*
|
||||||
** $Id: ldo.c,v 1.31 1999/02/04 17:47:59 roberto Exp roberto $
|
** $Id: ldo.c,v 1.32 1999/02/12 19:23:02 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
|
||||||
*/
|
*/
|
||||||
|
@ -329,6 +329,7 @@ static int protectedparser (ZIO *z, int bin) {
|
||||||
|
|
||||||
static int do_main (ZIO *z, int bin) {
|
static int do_main (ZIO *z, int bin) {
|
||||||
int status;
|
int status;
|
||||||
|
int debug = L->debug; /* save debug status */
|
||||||
do {
|
do {
|
||||||
long old_blocks = (luaC_checkGC(), L->nblocks);
|
long old_blocks = (luaC_checkGC(), L->nblocks);
|
||||||
status = protectedparser(z, bin);
|
status = protectedparser(z, bin);
|
||||||
|
@ -341,6 +342,7 @@ static int do_main (ZIO *z, int bin) {
|
||||||
L->GCthreshold -= newelems2;
|
L->GCthreshold -= newelems2;
|
||||||
}
|
}
|
||||||
} while (bin && status == 0);
|
} while (bin && status == 0);
|
||||||
|
L->debug = debug; /* restore debug status */
|
||||||
return status;
|
return status;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue