[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