summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-05-18 18:10:24 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-05-21 18:09:31 -0700
commitc6dcfcc2ec4d63e60139d49565a12d0b103c9d8a (patch)
treef4d86469a00317524ee6fe0d188bce408f860392 /sv.c
parent3fc18f30fc97fb47867d49892d6b3b422f6d3819 (diff)
downloadperl-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.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index dcb06a3a91..1f5e2f0ba4 100644
--- a/sv.c
+++ b/sv.c
@@ -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);