Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d81d70ba2335dcc24570cdd98bf0ff258b3bc369

>---------------------------------------------------------------

commit d81d70ba2335dcc24570cdd98bf0ff258b3bc369
Author: Simon Marlow <[email protected]>
Date:   Mon Oct 22 15:59:06 2012 +0100

    fix a warning

>---------------------------------------------------------------

 rts/Schedule.c |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/rts/Schedule.c b/rts/Schedule.c
index 8b74a95..d44cf72 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -459,11 +459,11 @@ run_thread:
         // conserve power (see #1623).  Re-enable it here.
         nat prev;
         prev = xchg((P_)&recent_activity, ACTIVITY_YES);
-#ifndef PROFILING
         if (prev == ACTIVITY_DONE_GC) {
+#ifndef PROFILING
             startTimer();
-        }
 #endif
+        }
         break;
     }
     case ACTIVITY_INACTIVE:



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to