diff options
author | Steve Hay <SteveHay@planit.com> | 2006-11-28 15:57:45 +0000 |
---|---|---|
committer | Steve Hay <SteveHay@planit.com> | 2006-11-28 15:57:45 +0000 |
commit | aebaba0b5be8c1153dcfd9402824b0dc15298fe9 (patch) | |
tree | 6cc25d317bee3d1adb6c40d2f781cb84506edcce | |
parent | 428eed4a3c021dd32b21fe7b786a478613c6dcc3 (diff) | |
download | perl-aebaba0b5be8c1153dcfd9402824b0dc15298fe9.tar.gz |
Silence VC++ 8 warnings about "possible loss of data"
p4raw-id: //depot/perl@29408
-rw-r--r-- | ext/POSIX/POSIX.xs | 2 | ||||
-rw-r--r-- | pp_sys.c | 6 |
2 files changed, 4 insertions, 4 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 3c7b0b890f..8f51750aac 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -1804,7 +1804,7 @@ mktime(sec, min, hour, mday, mon, year, wday = 0, yday = 0, isdst = 0) mytm.tm_wday = wday; mytm.tm_yday = yday; mytm.tm_isdst = isdst; - RETVAL = mktime(&mytm); + RETVAL = (SysRetLong) mktime(&mytm); } OUTPUT: RETVAL @@ -2910,9 +2910,9 @@ PP(pp_stat) PUSHs(sv_2mortal(newSVnv(PL_statcache.st_mtime))); PUSHs(sv_2mortal(newSVnv(PL_statcache.st_ctime))); #else - PUSHs(sv_2mortal(newSViv(PL_statcache.st_atime))); - PUSHs(sv_2mortal(newSViv(PL_statcache.st_mtime))); - PUSHs(sv_2mortal(newSViv(PL_statcache.st_ctime))); + PUSHs(sv_2mortal(newSViv((IV)PL_statcache.st_atime))); + PUSHs(sv_2mortal(newSViv((IV)PL_statcache.st_mtime))); + PUSHs(sv_2mortal(newSViv((IV)PL_statcache.st_ctime))); #endif #ifdef USE_STAT_BLOCKS PUSHs(sv_2mortal(newSVuv(PL_statcache.st_blksize))); |