Commit 4ba3cb05 authored by simonmarhaskell@gmail.com's avatar simonmarhaskell@gmail.com
Browse files

debug output: show mem in use

parent d564f415
......@@ -253,8 +253,8 @@ GarbageCollect ( rtsBool force_major_gc )
#else
n_gc_threads = 1;
#endif
trace(TRACE_gc|DEBUG_gc, "GC (gen %d): %dKB to collect, using %d thread(s)",
N, n * (BLOCK_SIZE / 1024), n_gc_threads);
trace(TRACE_gc|DEBUG_gc, "GC (gen %d): %d KB to collect, %ld MB in use, using %d thread(s)",
N, n * (BLOCK_SIZE / 1024), mblocks_allocated, n_gc_threads);
#ifdef RTS_GTK_FRONTPANEL
if (RtsFlags.GcFlags.frontpanel) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment