summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2003-10-16 19:31:19 +0000
committerNicholas Clark <nick@ccl4.org>2003-10-16 19:31:19 +0000
commit4c9cc5953a3992eecff824aeaacb5b7670e2db46 (patch)
tree56301bf97cf98aedf9c3cb1a34d8933ccf6df4ac /hv.c
parent29e973714a981ba7ad514bfe1fab7d4003a07033 (diff)
downloadperl-4c9cc5953a3992eecff824aeaacb5b7670e2db46.tar.gz
Duplicate 19423 (pathological hashes too easy) into share_hek_flags
(as suggested by Jan Dubois) p4raw-id: //depot/perl@21469
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/hv.c b/hv.c
index 5e2a3853a9..965b6ae638 100644
--- a/hv.c
+++ b/hv.c
@@ -2288,7 +2288,7 @@ S_share_hek_flags(pTHX_ const char *str, I32 len, register U32 hash, int flags)
xhv->xhv_keys++; /* HvKEYS(hv)++ */
if (i) { /* initial entry? */
xhv->xhv_fill++; /* HvFILL(hv)++ */
- if (xhv->xhv_keys > (IV)xhv->xhv_max /* HvKEYS(hv) > HvMAX(hv) */)
+ } else if (xhv->xhv_keys > (IV)xhv->xhv_max /* HvKEYS(hv) > HvMAX(hv) */) {
hsplit(PL_strtab);
}
}