fix a warning

[ghc-hetmet.git] / ghc / rts / RetainerSet.h

diff --git a/ghc/rts/RetainerSet.h b/ghc/rts/RetainerSet.h
index 1ab0976..6a00e13 100644 (file)
--- a/ghc/rts/RetainerSet.h
+++ b/ghc/rts/RetainerSet.h
@@ -127,7 +127,7 @@ extern RetainerSet rs_MANY;
  */
 
 #define BINARY_SEARCH_THRESHOLD   8
-static inline rtsBool
+INLINE_HEADER rtsBool
 isMember(retainer r, RetainerSet *rs)
 {
   int i, left, right;       // must be int, not nat (because -1 can appear)
@@ -197,5 +197,5 @@ void outputAllRetainerSet(FILE *);
 //       the best place to define it.
 void printRetainer(FILE *, retainer);
 
-#endif // PROFILING
-#endif // RETAINERSET_H
+#endif /* PROFILING */
+#endif /* RETAINERSET_H */