develooper Front page | perl.perl5.porters | Postings from September 2011

Re: CPAN smoke for magicflags1 done

Thread Previous | Thread Next
From:
Chip Salzenberg
Date:
September 19, 2011 16:07
Subject:
Re: CPAN smoke for magicflags1 done
Message ID:
CANSL5VEEpzU-U232KO7TFmKL=AvkudKVedaGqUp0-O--tiRTFw@mail.gmail.com
On Mon, Sep 19, 2011 at 9:51 AM, Chip Salzenberg <rev.chip@gmail.com> wrote:

> And the first concrete patch comes out of the smoke.


And now the second, a double rainbow^Wmagic in av_exists.  This one was
triggered by, of all things, Acme::Oil.  And others, probably.

diff --git av.c av.c
index e6b9d22..45ba340 100644
--- av.c
+++ av.c
@@ -950,7 +950,7 @@ Perl_av_exists(pTHX_ AV *av, I32 key)
             mg = mg_find(sv, PERL_MAGIC_tiedelem);
             if (mg) {
                 magic_existspack(sv, mg);
-                return cBOOL(SvTRUE(sv));
+                return cBOOL(SvTRUE_nomg(sv));
             }

         }

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About