X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.c;h=6c19a6aff298b255ab2ed884da6553d5c7a9e3ab;hb=5244f537d12bdb5e016ce7b04e9181b364e5cb27;hp=250d07fa4e51d2b405bc625d42fff1a16452658d;hpb=630e4476971aa21a8c7e7bf39dae7dc1bf4b9b57;p=ghc-hetmet.git diff --git a/rts/sm/GC.c b/rts/sm/GC.c index 250d07f..6c19a6a 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -468,6 +468,7 @@ GarbageCollect ( rtsBool force_major_gc ) trace(TRACE_gc,"thread %d:", i); trace(TRACE_gc," copied %ld", gc_threads[i]->copied * sizeof(W_)); trace(TRACE_gc," any_work %ld", gc_threads[i]->any_work); + trace(TRACE_gc," no_work %ld", gc_threads[i]->no_work); trace(TRACE_gc," scav_global_work %ld", gc_threads[i]->scav_global_work); trace(TRACE_gc," scav_local_work %ld", gc_threads[i]->scav_local_work); } @@ -1362,6 +1363,7 @@ init_gc_thread (gc_thread *t) t->thunk_selector_depth = 0; t->copied = 0; t->any_work = 0; + t->no_work = 0; t->scav_global_work = 0; t->scav_local_work = 0; }