Quellcode durchsuchen

GC may crash when checking C closures

Roberto Ierusalimschy vor 25 Jahren
Ursprung
Commit
c9c6f9747c
2 geänderte Dateien mit 6 neuen und 2 gelöschten Zeilen
  1. 4 0
      bugs
  2. 2 2
      lgc.c

+ 4 - 0
bugs

@@ -213,3 +213,7 @@ Mon Sep 25 11:47:48 EST 2000
 >> lua_gettable does not get key from stack top
 >> lua_gettable does not get key from stack top
 (by Philip Yi; since 4.0b)
 (by Philip Yi; since 4.0b)
 
 
+** lgc.c
+Mon Sep 25 11:50:48 EST 2000
+>> GC may crash when checking C closures
+(by Philip Yi; since 4.0b)

+ 2 - 2
lgc.c

@@ -1,5 +1,5 @@
 /*
 /*
-** $Id: lgc.c,v 1.65 2000/09/11 17:38:42 roberto Exp roberto $
+** $Id: lgc.c,v 1.66 2000/09/19 08:42:35 roberto Exp roberto $
 ** Garbage Collector
 ** Garbage Collector
 ** See Copyright Notice in lua.h
 ** See Copyright Notice in lua.h
 */
 */
@@ -152,7 +152,7 @@ static int hasmark (const TObject *o) {
     case TAG_TABLE:
     case TAG_TABLE:
       return ismarked(hvalue(o));
       return ismarked(hvalue(o));
     case TAG_LCLOSURE:  case TAG_CCLOSURE:
     case TAG_LCLOSURE:  case TAG_CCLOSURE:
-      return ismarked(clvalue(o)->mark);
+      return ismarked(clvalue(o));
     default:  /* number */
     default:  /* number */
       return 1;
       return 1;
   }
   }