From: sof <unknown>
Date: Tue, 25 Mar 2003 17:24:30 +0000 (+0000)
Subject: [project @ 2003-03-25 17:24:30 by sof]
X-Git-Tag: Approx_11550_changesets_converted~1035
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=d139a7ae37a61da8f641f0cae33d0ceb7479f398;p=ghc-hetmet.git

[project @ 2003-03-25 17:24:30 by sof]
msTime(): only used with PAR
---

diff --git a/ghc/rts/RtsUtils.c b/ghc/rts/RtsUtils.c
index 64b7758..b31b87e 100644
--- a/ghc/rts/RtsUtils.c
+++ b/ghc/rts/RtsUtils.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RtsUtils.c,v 1.30 2003/03/19 18:41:19 sof Exp $
+ * $Id: RtsUtils.c,v 1.31 2003/03/25 17:24:30 sof Exp $
  *
  * (c) The GHC Team, 1998-2002
  *
@@ -260,6 +260,7 @@ void resetNonBlockingFd(int fd STG_UNUSED) {}
 void setNonBlockingFd(int fd STG_UNUSED) {}
 #endif
 
+#ifdef PAR
 static ullong startTime = 0;
 
 /* used in a parallel setup */
@@ -294,6 +295,7 @@ msTime(void)
     return t * LL(1000) - startTime;
 # endif
 }
+#endif /* PAR */
 
 /* -----------------------------------------------------------------------------
    Print large numbers, with punctuation.