Commit 376fad71 authored by Simon Marlow's avatar Simon Marlow

Only allocate a mark stack if we're actually doing marking

saves a bit of memory in major GCs
parent 7ebf1a69
...@@ -289,7 +289,7 @@ GarbageCollect ( rtsBool force_major_gc ) ...@@ -289,7 +289,7 @@ GarbageCollect ( rtsBool force_major_gc )
/* Allocate a mark stack if we're doing a major collection. /* Allocate a mark stack if we're doing a major collection.
*/ */
if (major_gc) { if (major_gc && oldest_gen->steps[0].mark) {
nat mark_stack_blocks; nat mark_stack_blocks;
mark_stack_blocks = stg_max(MARK_STACK_BLOCKS, mark_stack_blocks = stg_max(MARK_STACK_BLOCKS,
oldest_gen->steps[0].n_old_blocks / 100); oldest_gen->steps[0].n_old_blocks / 100);
......
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