summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-12-28 16:57:19 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-12-28 16:57:19 +0000
commite9652cb9da1b744b9c6b69e7593a4ee79bb64657 (patch)
tree2bbb48fbc6c6c356cbf3a04bcb8e015354444163 /doop.c
parente36b5403fc0619ba37b39da6a46503f45499bc51 (diff)
downloadperl-e9652cb9da1b744b9c6b69e7593a4ee79bb64657.tar.gz
(retracted by #13919)
p4raw-id: //depot/perl@13917
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 9f0fa6466a..1a3e9fcb81 100644
--- a/doop.c
+++ b/doop.c
@@ -1318,7 +1318,7 @@ Perl_do_kv(pTHX)
}
if (! SvTIED_mg((SV*)keys, PERL_MAGIC_tied))
- i = HvKEYS(keys);
+ i = (IV)HvKEYS(keys);
else {
i = 0;
/*SUPPRESS 560*/