[svn:ponie] r354 - in trunk: perl src/pmc

Author: nicholas
Date: Mon Aug 29 09:39:14 2005
New Revision: 354

Modified:
   trunk/perl/sv.h
   trunk/src/pmc/perl5cargo_cult.pmc
Log:
Remove Ponie_P_REFCNT, as you can't access the reference count as an LVALUE
now.


Modified: trunk/perl/sv.h
==============================================================================
--- trunk/perl/sv.h	(original)
+++ trunk/perl/sv.h	Mon Aug 29 09:39:14 2005
@@ -191,7 +191,6 @@ typedef enum {
   Ponie_P_ANY,			/* SvANY (the value)	   */
   Ponie_P_ANY_P,		/* &SvANY pointer	   */
   Ponie_P_FLAGS,		/* &SvFLAGS pointer	   */
-  Ponie_P_REFCNT,		/* &SvREFCNT pointer	   */
   Ponie_P_RV,			/* &SvRV pointer	   */
   Ponie_P_PVX,			/* &SvPVX pointer	   */
   Ponie_P_CUR,			/* &SvCUR pointer	   */

Modified: trunk/src/pmc/perl5cargo_cult.pmc
==============================================================================
--- trunk/src/pmc/perl5cargo_cult.pmc	(original)
+++ trunk/src/pmc/perl5cargo_cult.pmc	Mon Aug 29 09:39:14 2005
@@ -145,8 +145,6 @@ pmclass Perl5cargo_cult dynpmc {
 	    return PMC_struct_val(SELF);
 	case Ponie_P_FLAGS:
             return &(((struct STRUCT_SV*)PMC_struct_val(SELF))->sv_flags);
-	case Ponie_P_REFCNT:
-            return &(((struct STRUCT_SV*)PMC_struct_val(SELF))->sv_refcnt);
 
 	case Ponie_P_RV:
             assert (!(PERL5_FLAGS(SELF) & SVp_POK));