[svn:parrot] r38098 - branches/pcc_rewiring/src/pmc

[allison at svn.parrot.org]

Author: allison
Date: Tue Apr 14 02:37:26 2009
New Revision: 38098
URL: https://trac.parrot.org/parrot/changeset/38098

Log:
[pcc] Don't mark the PMC and String children of a CPointer (have made
this change before, but seems it was never merged into trunk).

Modified:
   branches/pcc_rewiring/src/pmc/cpointer.pmc

Modified: branches/pcc_rewiring/src/pmc/cpointer.pmc
==============================================================================
--- branches/pcc_rewiring/src/pmc/cpointer.pmc	Tue Apr 14 02:20:22 2009	(r38097)
+++ branches/pcc_rewiring/src/pmc/cpointer.pmc	Tue Apr 14 02:37:26 2009	(r38098)
@@ -89,19 +89,6 @@
 
         if (data->sig)
             pobject_lives(interp, (PObj *)data->sig);
-
-        if (data->pointer) {
-            if (Parrot_str_equal(interp, data->sig, CONST_STRING(interp, "P"))) {
-                PMC ** const pmc_pointer = (PMC **) data->pointer;
-                PARROT_ASSERT(*pmc_pointer);
-                pobject_lives(interp, (PObj *) *pmc_pointer);
-            }
-            else if (Parrot_str_equal(interp, data->sig, CONST_STRING(interp, "S"))) {
-                STRING ** const str_pointer = (STRING **) data->pointer;
-                PARROT_ASSERT(*str_pointer);
-                pobject_lives(interp, (PObj *) *str_pointer);
-            }
-        }
     }
 
 /*