summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-04-28 01:55:10 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-04-28 01:55:10 +0000
commitc193270f154d69780abbcc5b212fb29de0665792 (patch)
treeb91e96411c14ecab961d582d729cbae16bef3c79 /hv.c
parent70f5e4ed9b5c937fb84bff8f79043eda4aff6a7f (diff)
downloadperl-c193270f154d69780abbcc5b212fb29de0665792.tar.gz
More valgrind findings: e.g. t/op/utfhash.t.
p4raw-id: //depot/perl@16238
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/hv.c b/hv.c
index 919a5d5479..6d8461fe39 100644
--- a/hv.c
+++ b/hv.c
@@ -1935,6 +1935,7 @@ Perl_hv_iterkeysv(pTHX_ register HE *entry)
sv = newSVpvn ((char*)as_utf8, utf8_len);
SvUTF8_on (sv);
+ Safefree (as_utf8); /* bytes_to_utf8() allocates a new string */
} else {
sv = newSVpvn_share(HEK_KEY(hek),
(HEK_UTF8(hek) ? -HEK_LEN(hek) : HEK_LEN(hek)),