[svn:parrot] r41680 - branches/pcc_reapply/src/pmc
bacek at svn.parrot.org
bacek at svn.parrot.org
Sun Oct 4 11:03:18 UTC 2009
Author: bacek
Date: Sun Oct 4 11:03:18 2009
New Revision: 41680
URL: https://trac.parrot.org/parrot/changeset/41680
Log:
Mark all attributes of CallSignature.
Modified:
branches/pcc_reapply/src/pmc/callsignature.pmc
Modified: branches/pcc_reapply/src/pmc/callsignature.pmc
==============================================================================
--- branches/pcc_reapply/src/pmc/callsignature.pmc Sun Oct 4 11:02:50 2009 (r41679)
+++ branches/pcc_reapply/src/pmc/callsignature.pmc Sun Oct 4 11:03:18 2009 (r41680)
@@ -229,11 +229,14 @@
VTABLE void mark() {
Parrot_CallSignature_attributes * const attrs = PARROT_CALLSIGNATURE(SELF);
- if (attrs) {
- Parrot_gc_mark_PMC_alive(interp, attrs->returns);
- Parrot_gc_mark_PMC_alive(interp, attrs->type_tuple);
- Parrot_gc_mark_STRING_alive(interp, attrs->short_sig);
- }
+ if (!attrs)
+ return;
+
+ Parrot_gc_mark_PMC_alive(interp, attrs->returns);
+ Parrot_gc_mark_PMC_alive(interp, attrs->type_tuple);
+ Parrot_gc_mark_STRING_alive(interp, attrs->short_sig);
+ Parrot_gc_mark_PMC_alive(interp, attrs->arg_flags);
+ Parrot_gc_mark_PMC_alive(interp, attrs->return_flags);
SUPER();
}
More information about the parrot-commits
mailing list