diff options
| author | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2019-05-28 10:46:41 +0300 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-05-29 10:41:44 -0400 |
| commit | 4d51e0d80f02483e86f4ad3bae47dcb3311def6b (patch) | |
| tree | bf9d323606e89d2f25b7d7e15c1d3ed85d933089 | |
| parent | fb26d46754564bfacda98618d86d3ee4eda1fcf2 (diff) | |
| download | haskell-4d51e0d80f02483e86f4ad3bae47dcb3311def6b.tar.gz | |
CNF.c: Move debug functions behind ifdef
| -rw-r--r-- | rts/sm/CNF.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/CNF.c b/rts/sm/CNF.c index 8d0ebccaf3..d0447f867c 100644 --- a/rts/sm/CNF.c +++ b/rts/sm/CNF.c @@ -281,6 +281,7 @@ compactFree(StgCompactNFData *str) } } +#if defined(DEBUG) void compactMarkKnown(StgCompactNFData *str) { @@ -319,7 +320,6 @@ countCompactBlocks(bdescr *outer) return count; } -#if defined(DEBUG) // Like countCompactBlocks, but adjusts the size so each mblock is assumed to // only contain BLOCKS_PER_MBLOCK blocks. Used in memInventory(). StgWord |