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

[email protected] 8 Sep 2005 21:29:37 -0000
Newsgroups perl.ponie.changes
Message-ID <[email protected]>
Author: nicholas
Date: Thu Sep  8 14:29:36 2005
New Revision: 356

Modified:
   trunk/src/pmc/perl5cargo_cult.pmc
Log:
The addrregistry PMC now returns 0 on not found.


Modified: trunk/src/pmc/perl5cargo_cult.pmc
==============================================================================
--- trunk/src/pmc/perl5cargo_cult.pmc	(original)
+++ trunk/src/pmc/perl5cargo_cult.pmc	Thu Sep  8 14:29:36 2005
@@ -744,7 +744,7 @@ pmclass Perl5cargo_cult dynpmc {
                     /* Immortals will always report a non-zero reference count.
                      */
                     INTVAL refcnt = PERL5_REFCNT(INTERP, SELF);
-                    assert(refcnt == 0 || refcnt == -1);
+                    assert(refcnt == 0);
                 }
 
                 free(PMC_struct_val(SELF));