[svn:parrot] r40581 - branches/pcc_arg_unify/src/pmc
allison at svn.parrot.org
allison at svn.parrot.org
Sun Aug 16 05:37:17 UTC 2009
Author: allison
Date: Sun Aug 16 05:37:16 2009
New Revision: 40581
URL: https://trac.parrot.org/parrot/changeset/40581
Log:
[pcc] Removing unnecessary mark.
Modified:
branches/pcc_arg_unify/src/pmc/cpointer.pmc
Modified: branches/pcc_arg_unify/src/pmc/cpointer.pmc
==============================================================================
--- branches/pcc_arg_unify/src/pmc/cpointer.pmc Sun Aug 16 05:23:19 2009 (r40580)
+++ branches/pcc_arg_unify/src/pmc/cpointer.pmc Sun Aug 16 05:37:16 2009 (r40581)
@@ -87,19 +87,6 @@
if (data->sig) {
Parrot_gc_mark_PObj_alive(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);
- Parrot_gc_mark_PObj_alive(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);
- Parrot_gc_mark_PObj_alive(interp, (PObj *) *str_pointer);
- }
- }
}
}
More information about the parrot-commits
mailing list