From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 6 Apr 2002 16:08:14 +0000 (+0000)
Subject: Signedness nits.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2e5dfef704409bca4fd49ccb8a392cd0c49c6fd0;p=p5sagit%2Fp5-mst-13.2.git

Signedness nits.

p4raw-id: //depot/perl@15759
---

diff --git a/hv.c b/hv.c
index dd9353d..d5b7274 100644
--- a/hv.c
+++ b/hv.c
@@ -1880,9 +1880,9 @@ Perl_hv_iterkeysv(pTHX_ register HE *entry)
                Andreas would like keys he put in as utf8 to come back as utf8
             */
             STRLEN utf8_len = HEK_LEN(hek);
-            U8 *as_utf8 = bytes_to_utf8 (HEK_KEY(hek), &utf8_len);
+            U8 *as_utf8 = bytes_to_utf8 ((U8*)HEK_KEY(hek), &utf8_len);
 
-            sv = newSVpvn (as_utf8, utf8_len);
+            sv = newSVpvn ((char*)as_utf8, utf8_len);
             SvUTF8_on (sv);
         } else {
             sv = newSVpvn_share(HEK_KEY(hek),