[svn:parrot] r36653 - branches/rename_pccinvoke/src/pmc

whiteknight at svn.parrot.org whiteknight at svn.parrot.org
Fri Feb 13 01:36:19 UTC 2009


Author: whiteknight
Date: Fri Feb 13 01:36:18 2009
New Revision: 36653
URL: https://trac.parrot.org/parrot/changeset/36653

Log:
[rename_pccinvoke] gut the src/pmc/cpointer.pmc:mark routine, since this is only used in places where there is nothing here to be marked.

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

Modified: branches/rename_pccinvoke/src/pmc/cpointer.pmc
==============================================================================
--- branches/rename_pccinvoke/src/pmc/cpointer.pmc	Thu Feb 12 23:25:25 2009	(r36652)
+++ branches/rename_pccinvoke/src/pmc/cpointer.pmc	Fri Feb 13 01:36:18 2009	(r36653)
@@ -89,21 +89,6 @@
 
         if (data->sig)
             pobject_lives(interp, (PObj *)data->sig);
-
-
-        if (data->pointer) {
-            if (Parrot_str_not_equal(interp, data->sig, CONST_STRING(interp, "P")) == 0) {
-                PMC **pmc_pointer = (PMC **) data->pointer;
-                PARROT_ASSERT(*pmc_pointer);
-                pobject_lives(interp, (PObj *) *pmc_pointer);
-            }
-            else if (Parrot_str_not_equal(interp, data->sig, CONST_STRING(interp, "S")) == 0) {
-                STRING **str_pointer = (STRING **) data->pointer;
-                if(*str_pointer)
-                    pobject_lives(interp, (PObj *) *str_pointer);
-            }
-        }
-
     }
 
 /*


More information about the parrot-commits mailing list