Clear up most of the VC6 compiler warnings in the following smoke:

http://www.nntp.perl.org/group/perl.daily-build.reports/39733

p4raw-id: //depot/perl@28626

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index 638b1e1441..df1663597f 100644
--- a/pp.c
+++ b/pp.c
@@ -4035,7 +4035,7 @@ PP(pp_hslice)
 			STRLEN keylen;
 			const char * const key = SvPV_const(keysv, keylen);
 			SAVEDELETE(hv, savepvn(key,keylen),
-				   SvUTF8(keysv) ? -keylen : keylen);
+				   SvUTF8(keysv) ? -(I32)keylen : keylen);
 		    }
 		}
             }