[svn:ponie] r352 - trunk/src/pmc

[email protected] 29 Aug 2005 16:13:32 -0000
Newsgroups perl.ponie.changes
Message-ID <[email protected]>
Author: nicholas
Date: Mon Aug 29 09:13:31 2005
New Revision: 352

Modified:
   trunk/src/pmc/perl5cargo_cult_statics.c
Log:
Remove setting REFCNT from the PMC code.


Modified: trunk/src/pmc/perl5cargo_cult_statics.c
==============================================================================
--- trunk/src/pmc/perl5cargo_cult_statics.c	(original)
+++ trunk/src/pmc/perl5cargo_cult_statics.c	Mon Aug 29 09:13:31 2005
@@ -45,9 +45,6 @@ set_integer_keyed_int(Interp* interprete
         /*SvANY(sv) = (void *) 0xDEAD;*/
         ((struct STRUCT_SV *)PMC_struct_val(pmc))->sv_any = (void *) 0xDEAD;
         return;
-    case Ponie_I_SV_REFCNT:
-        PERL5_REFCNT(pmc) = value;
-        return;
     case Ponie_I_SV_REFCNT_INC:
         PERL5_REFCNT(pmc) += value;
         return;