[svn:parrot] r40417 - trunk/src

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Aug 5 12:12:52 UTC 2009


Author: bacek
Date: Wed Aug  5 12:12:52 2009
New Revision: 40417
URL: https://trac.parrot.org/parrot/changeset/40417

Log:
[cage] Don't try to mark non-GCable keys

Modified:
   trunk/src/key.c

Modified: trunk/src/key.c
==============================================================================
--- trunk/src/key.c	Wed Aug  5 11:44:12 2009	(r40416)
+++ trunk/src/key.c	Wed Aug  5 12:12:52 2009	(r40417)
@@ -619,9 +619,11 @@
     }
 
     /* Mark next key */
-    GETATTR_Key_next_key(interp, key, next_key);
-    if (next_key)
-        Parrot_gc_mark_PObj_alive(interp, (PObj *)next_key);
+    if (flags == KEY_string_FLAG || flags == KEY_pmc_FLAG) {
+        GETATTR_Key_next_key(interp, key, next_key);
+        if (next_key)
+            Parrot_gc_mark_PObj_alive(interp, (PObj *)next_key);
+    }
 
 }
 


More information about the parrot-commits mailing list