summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2007-03-21 23:21:46 +0000
committerSteve Peters <steve@fisharerojo.org>2007-03-21 23:21:46 +0000
commit8b7231d9a7617fcb58e0a2517db5f2a58d67e5d2 (patch)
tree37e002da52b711b767e98c52640b48f8ffc12d16 /doio.c
parent117af99a3e1454bb4a4f0d2231afac25557d14fa (diff)
downloadperl-8b7231d9a7617fcb58e0a2517db5f2a58d67e5d2.tar.gz
Silence a couple of warnings caused by change #30672.
p4raw-link: @30672 on //depot/perl: c94db568e030a227855e08f584b1bff860be0cf5 p4raw-id: //depot/perl@30675
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/doio.c b/doio.c
index 1f1d2a213b..e1acc67c0f 100644
--- a/doio.c
+++ b/doio.c
@@ -1832,7 +1832,8 @@ nothing in the core.
if (GvIO(gv) && IoIFP(GvIOp(gv))) {
#ifdef HAS_FUTIMES
APPLY_TAINT_PROPER();
- if (futimes(PerlIO_fileno(IoIFP(GvIOn(gv))), utbufp))
+ if (futimes(PerlIO_fileno(IoIFP(GvIOn(gv))),
+ (struct timeval *) utbufp))
tot--;
#else
Perl_die(aTHX_ PL_no_func, "futimes");
@@ -1850,7 +1851,7 @@ nothing in the core.
const char * const name = SvPV_nolen_const(*mark);
APPLY_TAINT_PROPER();
#ifdef HAS_FUTIMES
- if (utimes(name, utbufp))
+ if (utimes(name, (struct timeval *)utbufp))
#else
if (PerlLIO_utime(name, utbufp))
#endif