diff options
-rw-r--r-- | rts/Trace.c | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/rts/Trace.c b/rts/Trace.c index 77e3bf0bd9..870bc079b0 100644 --- a/rts/Trace.c +++ b/rts/Trace.c @@ -684,18 +684,6 @@ void traceHeapProfSampleString(StgWord8 profile_id, void traceIPE(const InfoProvEnt *ipe) { -#if defined(DEBUG) - if (RtsFlags.TraceFlags.tracing == TRACE_STDERR) { - ACQUIRE_LOCK(&trace_utx); - - tracePreface(); - debugBelch("IPE: table_name %s, closure_desc %s, ty_desc %s, label %s, module %s, srcloc %s:%s\n", - ipe->prov.table_name, ipe->prov.closure_desc, ipe->prov.ty_desc, - ipe->prov.label, ipe->prov.module, ipe->prov.src_file, ipe->prov.src_span); - - RELEASE_LOCK(&trace_utx); - } else -#endif if (eventlog_enabled) { postIPE(ipe); } |