diff options
author | Rick Delaney <rick@consumercontact.com> | 2003-01-01 17:54:59 -0500 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-09-18 19:15:07 +0000 |
commit | 29ddfe354327d85ef66e9723b006d41eb553cd25 (patch) | |
tree | 249aeaf66eb16205c4a8528f9c8589ebf8f70258 /pp.h | |
parent | d1bddb8e6a8a26e4cebf65fd8f44b156b4784f23 (diff) | |
download | perl-29ddfe354327d85ef66e9723b006d41eb553cd25.tar.gz |
Re: [perl #19582] [PATCH bleedperl] bad overload copy constructor segfaults
Message-ID: <20030101225459.A2320@cs839290-a.mtth.phub.net.cable.rogers.com>
(Pity the first patch fell through the cracks back then.
Not that forbidding non-object copy constructors is the right
thing to do but the bug could use fixing.)
p4raw-id: //depot/perl@21276
Diffstat (limited to 'pp.h')
-rw-r--r-- | pp.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -385,8 +385,8 @@ See C<PUSHu>. changed SV* ref to SV* tmpRef */ #define RvDEEPCP(rv) STMT_START { SV* tmpRef=SvRV(rv); \ if (SvREFCNT(tmpRef)>1) { \ + SvRV(rv)=AMG_CALLun(rv,copy); \ SvREFCNT_dec(tmpRef); \ - SvRV(rv)=AMG_CALLun(rv,copy); \ } } STMT_END /* |