[commit: ghc] master: rts: One more Clang-unfriendly CPP usage (04e1c27)

git at git.haskell.org git at git.haskell.org
Mon Dec 7 13:08:12 UTC 2015


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/04e1c27943503f2e12b009b91f7bef195766f6d0/ghc

>---------------------------------------------------------------

commit 04e1c27943503f2e12b009b91f7bef195766f6d0
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Mon Dec 7 14:08:28 2015 +0100

    rts: One more Clang-unfriendly CPP usage


>---------------------------------------------------------------

04e1c27943503f2e12b009b91f7bef195766f6d0
 rts/sm/BlockAlloc.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/rts/sm/BlockAlloc.c b/rts/sm/BlockAlloc.c
index e721fb1..a633726 100644
--- a/rts/sm/BlockAlloc.c
+++ b/rts/sm/BlockAlloc.c
@@ -835,9 +835,9 @@ checkFreeListSanity(void)
         // make sure we're fully coalesced
         if (bd->link != NULL)
         {
-            ASSERT (MBLOCK_ROUND_DOWN(bd->link) !=
-                    (StgWord8*)MBLOCK_ROUND_DOWN(bd) +
-                    BLOCKS_TO_MBLOCKS(bd->blocks) * MBLOCK_SIZE);
+            ASSERT(MBLOCK_ROUND_DOWN(bd->link) !=
+                   (StgWord8*)MBLOCK_ROUND_DOWN(bd) +
+                   BLOCKS_TO_MBLOCKS(bd->blocks) * MBLOCK_SIZE);
         }
     }
 }



More information about the ghc-commits mailing list