Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/703a30fe2884a72cab9558c8feb7fba8cfcae254 >--------------------------------------------------------------- commit 703a30fe2884a72cab9558c8feb7fba8cfcae254 Author: Ian Lynagh <[email protected]> Date: Thu Mar 22 10:55:29 2012 +0000 Disable some debug prints that a plain +RTS -DS was enabling >--------------------------------------------------------------- rts/Trace.c | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) diff --git a/rts/Trace.c b/rts/Trace.c index df5147c..7f314ba 100644 --- a/rts/Trace.c +++ b/rts/Trace.c @@ -308,6 +308,7 @@ void traceCapsetEvent_ (EventTypeNum tag, CapsetID capset, StgWord info) { +#if 0 #ifdef DEBUG if (RtsFlags.TraceFlags.tracing == TRACE_STDERR) { ACQUIRE_LOCK(&trace_utx); @@ -332,6 +333,7 @@ void traceCapsetEvent_ (EventTypeNum tag, RELEASE_LOCK(&trace_utx); } else #endif +#endif { if (eventlog_enabled) { postCapsetEvent(tag, capset, info); _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
