[Git][ghc/ghc][master] CNF.c: Move debug functions behind ifdef
Marge Bot
gitlab at gitlab.haskell.org
Wed May 29 14:41:48 UTC 2019
Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC
Commits:
4d51e0d8 by Ömer Sinan Ağacan at 2019-05-29T14:41:44Z
CNF.c: Move debug functions behind ifdef
- - - - -
1 changed file:
- rts/sm/CNF.c
Changes:
=====================================
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
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/4d51e0d80f02483e86f4ad3bae47dcb3311def6b
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/4d51e0d80f02483e86f4ad3bae47dcb3311def6b
You're receiving this email because of your account on gitlab.haskell.org.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20190529/50a86cbc/attachment.html>
More information about the ghc-commits
mailing list