return;
}
- debugTrace(DEBUG_gc,"scavenging thread %d",tso->id);
+ debugTrace(DEBUG_gc,"scavenging thread %d",(int)tso->id);
saved_eager = gct->eager_promotion;
gct->eager_promotion = rtsFalse;
* evacuated, so we perform that check here.
*/
StgClosure *q = ((StgInd *)p)->indirectee;
- if (HEAP_ALLOCED(q) && Bdescr((StgPtr)q)->flags & BF_EVACUATED) {
+ if (HEAP_ALLOCED_GC(q) && Bdescr((StgPtr)q)->flags & BF_EVACUATED) {
break;
}
evacuate(&((StgInd *)p)->indirectee);