Fix maintenance of n_blocks in the RTS
authorIan Lynagh <igloo@earth.li>
Mon, 30 Apr 2012 23:25:55 +0000 (00:25 +0100)
committerIan Lynagh <igloo@earth.li>
Mon, 30 Apr 2012 23:25:55 +0000 (00:25 +0100)
commit3457c6befa697e52dd71f7efa1940f010f792469
treeb2e81f9eb2f28d332d7ba6f29998d6249a11a6ff
parente89ef70475fa5e9cf17af01b1b5d7fced0d2e13c
Fix maintenance of n_blocks in the RTS

It was causing assertion failures of
    ASSERT(countBlocks(nursery->blocks) == nursery->n_blocks)
at
    ghc-stage2: internal error: ASSERTION FAILED: file rts/sm/Sanity.c, line 878
rts/sm/Storage.c