X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStable.c;h=c0520dae68f48eed194261552c88aace7187067c;hb=423d477bfecd490de1449c59325c8776f91d7aac;hp=30a603a8ae66941317db8f499f3aa4d56e2d3263;hpb=2ec7f46d067748eb0f62e0b23b9ebf50ecfc67e0;p=ghc-hetmet.git diff --git a/ghc/rts/Stable.c b/ghc/rts/Stable.c index 30a603a..c0520da 100644 --- a/ghc/rts/Stable.c +++ b/ghc/rts/Stable.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Stable.c,v 1.26 2003/06/24 13:45:49 stolz Exp $ + * $Id: Stable.c,v 1.28 2004/08/13 13:10:45 simonmar Exp $ * * (c) The GHC Team, 1998-2002 * @@ -13,7 +13,6 @@ #include "PosixSource.h" #include "Rts.h" #include "Hash.h" -#include "StablePriv.h" #include "RtsUtils.h" #include "Storage.h" #include "RtsAPI.h" @@ -117,7 +116,7 @@ static HashTable *addrToStableHash = NULL; #define INIT_SPT_SIZE 64 -static inline void +STATIC_INLINE void initFreeList(snEntry *table, nat n, snEntry *free) { snEntry *p; @@ -197,7 +196,7 @@ lookupStableName(StgPtr p) } } -static inline void +STATIC_INLINE void freeStableName(snEntry *sn) { ASSERT(sn->sn_obj == NULL);