commit 4494094031d3785b4527a9baf572cb1e272aa9d2
parent 04bbd0117174911a489ca7d2603c1e8717565405
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Wed, 16 Mar 2005 17:02:26 -0300
detail
Diffstat:
2 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/ldo.c b/ldo.c
@@ -1,5 +1,5 @@
/*
-** $Id: ldo.c,v 2.16 2005/03/08 20:10:05 roberto Exp roberto $
+** $Id: ldo.c,v 2.17 2005/03/09 16:28:07 roberto Exp roberto $
** Stack and Call structure of Lua
** See Copyright Notice in lua.h
*/
@@ -74,6 +74,7 @@ void luaD_throw (lua_State *L, int errcode) {
LUAI_THROW(L, L->errorJmp);
}
else {
+ L->status = errcode;
if (G(L)->panic) G(L)->panic(L);
exit(EXIT_FAILURE);
}
diff --git a/lgc.c b/lgc.c
@@ -1,5 +1,5 @@
/*
-** $Id: lgc.c,v 2.28 2005/03/08 20:10:05 roberto Exp roberto $
+** $Id: lgc.c,v 2.29 2005/03/09 16:28:07 roberto Exp roberto $
** Garbage Collector
** See Copyright Notice in lua.h
*/
@@ -539,7 +539,7 @@ static void atomic (lua_State *L) {
propagateall(g); /* remark, to propagate `preserveness' */
cleartable(g->weak); /* remove collected objects from weak tables */
/* flip current white */
- g->currentwhite = otherwhite(g);
+ g->currentwhite = cast(lu_byte, otherwhite(g));
g->sweepstrgc = 0;
g->sweepgc = &g->rootgc;
g->gcstate = GCSsweepstring;