summaryrefslogtreecommitdiff
path: root/rts/posix/Select.c
diff options
context:
space:
mode:
authorErik de Castro Lopo <erikd@mega-nerd.com>2012-08-03 15:14:35 +1000
committerSimon Marlow <marlowsd@gmail.com>2012-08-09 09:08:58 +0100
commit50f5016a67060538a5272cd5fa6f4532d0396ef2 (patch)
tree7f02701e29f29d3fbda1dc6bb4f4c97dfba455a0 /rts/posix/Select.c
parent415598b232f6664fb4da8321f5f578405af245de (diff)
downloadhaskell-50f5016a67060538a5272cd5fa6f4532d0396ef2.tar.gz
Add cast to placate gcc 4.6 on linux-powerpc (#7113).
Diffstat (limited to 'rts/posix/Select.c')
-rw-r--r--rts/posix/Select.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/posix/Select.c b/rts/posix/Select.c
index 99a9508507..d638829fc9 100644
--- a/rts/posix/Select.c
+++ b/rts/posix/Select.c
@@ -45,7 +45,7 @@
#if SIZEOF_VOID_P == 4
#define LowResTimeToTime(t) (USToTime((t) * 1000))
-#define TimeToLowResTimeRoundDown(t) (TimeToUS(t) / 1000)
+#define TimeToLowResTimeRoundDown(t) ((LowResTime)(TimeToUS(t) / 1000))
#define TimeToLowResTimeRoundUp(t) ((TimeToUS(t) + 1000-1) / 1000)
#else
#define LowResTimeToTime(t) (t)