[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