summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2012-01-15 19:21:38 +0000
committerIan Lynagh <igloo@earth.li>2012-01-15 19:21:38 +0000
commit54121fffb5ee069d9b7a5628104ff1114ea87182 (patch)
treeccf6cf4edf528892c5ea003f5cd8a70b6288f951
parente0383e29bee3903ebbe8a123a34ce0b174fdb02b (diff)
downloadhaskell-54121fffb5ee069d9b7a5628104ff1114ea87182.tar.gz
Fix a #define
I don't think it was causing any problems, but TimeToUS(x+y) would have evaluated to x + (y / 1000)
-rw-r--r--includes/Rts.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/includes/Rts.h b/includes/Rts.h
index 45c09f8fb7..3360eda323 100644
--- a/includes/Rts.h
+++ b/includes/Rts.h
@@ -166,7 +166,7 @@ typedef StgInt64 Time;
#if TIME_RESOLUTION == 1000000000
// I'm being lazy, but it's awkward to define fully general versions of these
-#define TimeToUS(t) (t / 1000)
+#define TimeToUS(t) ((t) / 1000)
#define TimeToNS(t) (t)
#define USToTime(t) ((Time)(t) * 1000)
#define NSToTime(t) ((Time)(t))