From 680fc88cc2976724611e6cec58379c6078d648b2 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 4 Aug 2005 10:37:38 -0300
Subject: [PATCH] a small bug

---
 ldebug.c | 3 ++-
 lgc.c    | 6 +++---
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/ldebug.c b/ldebug.c
index a89aab8c..24752fb3 100644
--- a/ldebug.c
+++ b/ldebug.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.c,v 2.24 2005/06/28 13:01:31 roberto Exp roberto $
+** $Id: ldebug.c,v 2.25 2005/07/11 13:59:03 roberto Exp roberto $
 ** Debug Interface
 ** See Copyright Notice in lua.h
 */
@@ -152,6 +152,7 @@ static void funcinfo (lua_Debug *ar, Closure *cl) {
   if (cl->c.isC) {
     ar->source = "=[C]";
     ar->linedefined = -1;
+    ar->lastlinedefined = -1;
     ar->what = "C";
   }
   else {
diff --git a/lgc.c b/lgc.c
index 3d1af41f..f6030844 100644
--- a/lgc.c
+++ b/lgc.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lgc.c,v 2.33 2005/05/31 14:25:18 roberto Exp roberto $
+** $Id: lgc.c,v 2.34 2005/06/07 18:53:45 roberto Exp roberto $
 ** Garbage Collector
 ** See Copyright Notice in lua.h
 */
@@ -528,10 +528,10 @@ static void remarkupvals (global_State *g) {
 static void atomic (lua_State *L) {
   global_State *g = G(L);
   size_t udsize;  /* total size of userdata to be finalized */
-  /* remark objects cautch by write barrier */
-  propagateall(g);
   /* remark occasional upvalues of (maybe) dead threads */
   remarkupvals(g);
+  /* traverse objects cautch by write barrier and by 'remarkupvals' */
+  propagateall(g);
   /* remark weak tables */
   g->gray = g->weak;
   g->weak = NULL;