X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FRetainerSet.c;h=45b74b08a4f524e1c6ab61bb1fc601485045a65c;hb=65d6f595de24d183da826dc8ee5a80b57a5ae0f3;hp=6834676dafd794f392922c4b34464d2a3a0ce0a9;hpb=2548429c5147b40adc0f14a78d24659462358d41;p=ghc-hetmet.git

diff --git a/ghc/rts/RetainerSet.c b/ghc/rts/RetainerSet.c
index 6834676..45b74b0 100644
--- a/ghc/rts/RetainerSet.c
+++ b/ghc/rts/RetainerSet.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RetainerSet.c,v 1.4 2003/03/25 17:58:49 sof Exp $
+ * $Id: RetainerSet.c,v 1.5 2003/11/12 17:49:08 sof Exp $
  *
  * (c) The GHC Team, 2001
  * Author: Sungwoo Park
@@ -52,7 +52,7 @@ RetainerSet rs_MANY = {
 /* -----------------------------------------------------------------------------
  * calculate the size of a RetainerSet structure
  * -------------------------------------------------------------------------- */
-static inline size_t
+STATIC_INLINE size_t
 sizeofRetainerSet( int elems )
 {
     return (sizeof(RetainerSet) + elems * sizeof(retainer));