Re: [PATCH hv.c] newHVhv shouldn't reset xhv_max so often
authorAbhijit Menon-Sen <ams@wiw.org>
Sat, 4 Aug 2001 16:56:35 +0000 (22:26 +0530)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 4 Aug 2001 14:10:39 +0000 (14:10 +0000)
Message-ID: <20010804165635.E526@lustre.dyn.wiw.org>

p4raw-id: //depot/perl@11571

hv.c

diff --git a/hv.c b/hv.c
index 2962de3..0f57afb 100644 (file)
--- a/hv.c
+++ b/hv.c
@@ -1209,7 +1209,7 @@ Perl_newHVhv(pTHX_ HV *ohv)
                STRLEN len = HeKLEN_UTF8(oent);
 
                ent = new_HE();
-               HeVAL(ent)     = SvREFCNT_inc(HeVAL(oent));
+               HeVAL(ent)     = newSVsv(HeVAL(oent));
                HeKEY_hek(ent) = shared ? share_hek(key, len, hash)
                                        :  save_hek(key, len, hash);
                if (prev)