diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-05-18 18:10:24 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-05-21 18:09:31 -0700 |
commit | c6dcfcc2ec4d63e60139d49565a12d0b103c9d8a (patch) | |
tree | f4d86469a00317524ee6fe0d188bce408f860392 /sv.c | |
parent | 3fc18f30fc97fb47867d49892d6b3b422f6d3819 (diff) | |
download | perl-c6dcfcc2ec4d63e60139d49565a12d0b103c9d8a.tar.gz |
sv.c: Don’t do SvAMAGIC_off in newSVrv
This has been useless since the flag was moved to the referent in com-
mit dd2eae66. rv is undefined by the time this statement is reached
if it was a reference.
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -9330,7 +9330,6 @@ Perl_newSVrv(pTHX_ SV *const rv, const char *const classname) new_SV(sv); SV_CHECK_THINKFIRST_COW_DROP(rv); - (void)SvAMAGIC_off(rv); if (SvTYPE(rv) >= SVt_PVMG) { const U32 refcnt = SvREFCNT(rv); |