summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-12-28 17:01:39 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-12-28 17:01:39 +0000
commita98face1fc078a6f6814326da72119f5bfb89dce (patch)
treee955ba0a2a794780fd4c83b9ac1c8f303afcd49b /doop.c
parent73eb9af10bd9a853ec4e3979456335a8665265a4 (diff)
downloadperl-a98face1fc078a6f6814326da72119f5bfb89dce.tar.gz
Retract #13917.
p4raw-id: //depot/perl@13919
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doop.c b/doop.c
index 1a3e9fcb81..9f0fa6466a 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*/