small debug output improvements

diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index cd09199..94da824 100644 (file)
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -248,8 +248,8 @@ GarbageCollect ( rtsBool force_major_gc )
   } else {
       n_gc_threads = RtsFlags.ParFlags.gcThreads;
   }
-  trace(TRACE_gc|DEBUG_gc, "GC: %dk to collect, using %d thread(s)",
-        n * (BLOCK_SIZE / 1024), n_gc_threads);
+  trace(TRACE_gc|DEBUG_gc, "GC (gen %d): %dKB to collect, using %d thread(s)",
+        N, n * (BLOCK_SIZE / 1024), n_gc_threads);
 #else
   n_gc_threads = 1;
 #endif
@@ -661,7 +661,7 @@ GarbageCollect ( rtsBool force_major_gc )
   IF_DEBUG(sanity, checkSanity());
 
   // extra GC trace info 
-  if (traceClass(TRACE_gc)) statDescribeGens();
+  if (traceClass(TRACE_gc|DEBUG_gc)) statDescribeGens();
 
 #ifdef DEBUG
   // symbol-table based profiling 

diff --git a/rts/sm/GCUtils.c b/rts/sm/GCUtils.c
index b400744..98e6f8a 100644 (file)
--- a/rts/sm/GCUtils.c
+++ b/rts/sm/GCUtils.c
@@ -89,7 +89,7 @@ push_todo_block (bdescr *bd, step *stp)
         stp->todos_last = bd;
     }
     stp->n_todos++;
-    trace(TRACE_gc, "step %d, n_todos: %d", stp->abs_no, stp->n_todos);
+    trace(TRACE_gc|DEBUG_gc, "step %d, n_todos: %d", stp->abs_no, stp->n_todos);
     RELEASE_SPIN_LOCK(&stp->sync_todo);
 }