Commit 886d3dbf authored by Simon Marlow's avatar Simon Marlow

Move checkGlobalTSOList() call from GarbageCollect() to checkSanity()

parent 128a7fae
......@@ -494,8 +494,6 @@ GarbageCollect ( rtsBool force_major_gc )
sweep(&oldest_gen->steps[0]);
}
IF_DEBUG(sanity, checkGlobalTSOList(rtsFalse));
/* run through all the generations/steps and tidy up
*/
copied = 0;
......
......@@ -1395,6 +1395,14 @@ checkSanity( void )
checkFreeListSanity();
}
#if defined(THREADED_RTS)
// check the stacks too in threaded mode, because we don't do a
// full heap sanity check in this case (see checkHeap())
checkGlobalTSOList(rtsTrue);
#else
checkGlobalTSOList(rtsFalse);
#endif
}
/* Nursery sanity check */
......
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