Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/2903754f04906d96a5334da3be22d22ffe840805 >--------------------------------------------------------------- commit 2903754f04906d96a5334da3be22d22ffe840805 Author: Simon Marlow <[email protected]> Date: Wed Jul 11 11:29:24 2012 +0100 Profiling: don't report IDLE time by default You can get it with +RTS -P, as with the other systemish cost centres like "GC". >--------------------------------------------------------------- rts/Profiling.c | 6 ++++-- 1 files changed, 4 insertions(+), 2 deletions(-) diff --git a/rts/Profiling.c b/rts/Profiling.c index ed374b5..cc4d78e 100644 --- a/rts/Profiling.c +++ b/rts/Profiling.c @@ -673,7 +673,8 @@ ignoreCC (CostCentre *cc) ( cc == CC_OVERHEAD || cc == CC_DONT_CARE || cc == CC_GC - || cc == CC_SYSTEM)) { + || cc == CC_SYSTEM + || cc == CC_IDLE)) { return rtsTrue; } else { return rtsFalse; @@ -687,7 +688,8 @@ ignoreCCS (CostCentreStack *ccs) ( ccs == CCS_OVERHEAD || ccs == CCS_DONT_CARE || ccs == CCS_GC - || ccs == CCS_SYSTEM)) { + || ccs == CCS_SYSTEM + || ccs == CCS_IDLE)) { return rtsTrue; } else { return rtsFalse; _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
