From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 28 Dec 2001 17:01:39 +0000 (+0000)
Subject: Retract #13917.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a98face1fc078a6f6814326da72119f5bfb89dce;p=p5sagit%2Fp5-mst-13.2.git

Retract #13917.

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

diff --git a/doop.c b/doop.c
index 1a3e9fc..9f0fa64 100644
--- a/doop.c
+++ b/doop.c
@@ -1318,7 +1318,7 @@ Perl_do_kv(pTHX)
 	}
 
 	if (! SvTIED_mg((SV*)keys, PERL_MAGIC_tied))
-	    i = (IV)HvKEYS(keys);
+	    i = HvKEYS(keys);
 	else {
 	    i = 0;
 	    /*SUPPRESS 560*/