X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FBlockAlloc.h;h=8d52e329a91f7f7b3fdee364ae73af23ec304dc9;hb=0d52a0a134871d317b5f8b53a952c882ce5ae5b6;hp=bb6e63f3b596058ccc6811ec50e29b5c6d744ff9;hpb=30681e796f707fa109aaf756d4586049f595195d;p=ghc-hetmet.git

diff --git a/ghc/rts/BlockAlloc.h b/ghc/rts/BlockAlloc.h
index bb6e63f..8d52e32 100644
--- a/ghc/rts/BlockAlloc.h
+++ b/ghc/rts/BlockAlloc.h
@@ -1,5 +1,4 @@
 /* -----------------------------------------------------------------------------
- * $Id: BlockAlloc.h,v 1.8 1999/11/09 15:46:49 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -28,7 +27,7 @@ extern void freeChain(bdescr *p);
 
 #define WORDS_PER_MBLOCK  (BLOCKS_PER_MBLOCK * BLOCK_SIZE_W)
 
-static inline nat
+INLINE_HEADER nat
 round_to_mblocks(nat words)
 {
   if (words > WORDS_PER_MBLOCK) {
@@ -48,4 +47,4 @@ extern void checkFreeListSanity(void);
 nat         countFreeList(void);
 #endif
 
-#endif BLOCK_ALLOC_H
+#endif /* BLOCK_ALLOC_H */