summaryrefslogtreecommitdiff
path: root/rts/Trace.c
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2012-03-22 10:55:29 +0000
committerIan Lynagh <igloo@earth.li>2012-03-22 10:55:29 +0000
commit703a30fe2884a72cab9558c8feb7fba8cfcae254 (patch)
tree4097937598de1eac89df24ca9f9e45c6230b4f99 /rts/Trace.c
parent1dee0bbad9ebd94d3690d178a1b882db3ed6def6 (diff)
downloadhaskell-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.c2
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);