diff options
author | Ian Lynagh <igloo@earth.li> | 2012-03-22 10:55:29 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2012-03-22 10:55:29 +0000 |
commit | 703a30fe2884a72cab9558c8feb7fba8cfcae254 (patch) | |
tree | 4097937598de1eac89df24ca9f9e45c6230b4f99 /rts/Trace.c | |
parent | 1dee0bbad9ebd94d3690d178a1b882db3ed6def6 (diff) | |
download | haskell-703a30fe2884a72cab9558c8feb7fba8cfcae254.tar.gz |
Disable some debug prints that a plain +RTS -DS was enabling
Diffstat (limited to 'rts/Trace.c')
-rw-r--r-- | rts/Trace.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Trace.c b/rts/Trace.c index df5147ca05..7f314ba5d6 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); |