Change 13917 by jhi@alpha on 2001/12/28 16:57:19

        Compilation warning from VOS.

Affected files ...

.... //depot/perl/doop.c#117 edit

Differences ...

==== //depot/perl/doop.c#117 (text) ====
Index: perl/doop.c
--- perl/doop.c.~1~     Fri Dec 28 10:00:05 2001
+++ perl/doop.c Fri Dec 28 10:00:05 2001
@@ -1318,7 +1318,7 @@
        }
 
        if (! SvTIED_mg((SV*)keys, PERL_MAGIC_tied))
-           i = HvKEYS(keys);
+           i = (IV)HvKEYS(keys);
        else {
            i = 0;
            /*SUPPRESS 560*/
End of Patch.

Reply via email to