From: Simon Marlow Date: Tue, 21 Mar 2006 11:27:02 +0000 (+0000) Subject: tiny cleanup X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1cccf54bcd78f730bb1d4ec01b3562bcb88b5b6d;p=ghc-hetmet.git tiny cleanup --- diff --git a/ghc/rts/RetainerSet.h b/ghc/rts/RetainerSet.h index 965b9d3..6a00e13 100644 --- 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)