In perl.git, the branch nicholas/hv_h_split has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/622bb1630b8bd29858e020f98df795a6ab95d2d3?hp=0b340fe025421621146aac814778d80ad1df28c2>
- Log -----------------------------------------------------------------
commit 622bb1630b8bd29858e020f98df795a6ab95d2d3
Author: Nicholas Clark <n...@ccl4.org>
Date: Wed Feb 20 17:00:20 2013 +0100
XXX Update comment - this really should be merged into the appropriate
commit
-----------------------------------------------------------------------
Summary of changes:
hv.c | 4 +---
1 files changed, 1 insertions(+), 3 deletions(-)
diff --git a/hv.c b/hv.c
index fa19c2b..b400505 100644
--- a/hv.c
+++ b/hv.c
@@ -807,9 +807,7 @@ Perl_hv_common(pTHX_ HV *hv, SV *keysv, const char *key,
STRLEN klen,
}
else {
*oentry = entry;
- /* I am not sure that HeNEXT(entry) will be NULL or not after new_HE().
- * So for now we assume that this is not a safe assumption, and set it
explicitly.
- * If we can prove that it IS a safe assumption we could remove the
next line.
+ /* HeNEXT(entry) isn't set by new_HE(). So we have do this ourselves:
*/
HeNEXT(entry) = NULL;
}
--
Perl5 Master Repository
