X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FBlockAlloc.h;fp=ghc%2Frts%2FBlockAlloc.h;h=32db94805a6830700837e17b6725e5d558f438ea;hb=20593d1d1cf47050d9430895a1c2ada6c39dfb98;hp=504e954c9876f6c7cd63affe165b2129178ef825;hpb=a814590c794226b34c0c9aff4138b0e7722ddab5;p=ghc-hetmet.git

diff --git a/ghc/rts/BlockAlloc.h b/ghc/rts/BlockAlloc.h
index 504e954..32db948 100644
--- a/ghc/rts/BlockAlloc.h
+++ b/ghc/rts/BlockAlloc.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: BlockAlloc.h,v 1.9 2001/05/03 16:32:55 simonmar Exp $
+ * $Id: BlockAlloc.h,v 1.10 2003/11/12 17:49:06 sof Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -28,7 +28,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) {