diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c index 722d9dc19b29c9f16cb486b63eff7293c79cfd4b..bf9e08de51eda04d7d89a328a6e66c11b8e33ed2 100644 --- a/rts/sm/Storage.c +++ b/rts/sm/Storage.c @@ -881,8 +881,8 @@ resizeNurseriesEach (W_ blocks) node = capNoToNumaNode(i); if (nursery_blocks < blocks) { - debugTrace(DEBUG_gc, "increasing size of nursery to %d blocks", - blocks); + debugTrace(DEBUG_gc, "increasing size of nursery from %d to %d blocks", + nursery_blocks, blocks); nursery->blocks = allocNursery(node, nursery->blocks, blocks-nursery_blocks); } @@ -890,8 +890,8 @@ resizeNurseriesEach (W_ blocks) { bdescr *next_bd; - debugTrace(DEBUG_gc, "decreasing size of nursery to %d blocks", - blocks); + debugTrace(DEBUG_gc, "decreasing size of nursery from %d to %d blocks", + nursery_blocks, blocks); bd = nursery->blocks; while (nursery_blocks > blocks) { @@ -905,6 +905,8 @@ resizeNurseriesEach (W_ blocks) // might have gone just under, by freeing a large block, so make // up the difference. if (nursery_blocks < blocks) { + debugTrace(DEBUG_gc, "reincreasing size of nursery from %d to %d blocks", + nursery_blocks, blocks); nursery->blocks = allocNursery(node, nursery->blocks, blocks-nursery_blocks); }