X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FCapability.h;h=d8eba0d733f17b4c5334e5eb5f99a5a511c5295d;hb=bc115352a6211fa8814eb1b584fe5284bf57ca00;hp=e12b8ce6e9820520e10d6a9b6e8a9395fc7a1f4d;hpb=5d52d9b64c21dcf77849866584744722f8121389;p=ghc-hetmet.git diff --git a/rts/Capability.h b/rts/Capability.h index e12b8ce..d8eba0d 100644 --- a/rts/Capability.h +++ b/rts/Capability.h @@ -199,9 +199,9 @@ extern volatile StgWord waiting_for_gc; // void waitForReturnCapability (Capability **cap/*in/out*/, Task *task); -INLINE_HEADER void recordMutableCap (StgClosure *p, Capability *cap, nat gen); +EXTERN_INLINE void recordMutableCap (StgClosure *p, Capability *cap, nat gen); -INLINE_HEADER void recordClosureMutated (Capability *cap, StgClosure *p); +EXTERN_INLINE void recordClosureMutated (Capability *cap, StgClosure *p); #if defined(THREADED_RTS) @@ -291,7 +291,7 @@ INLINE_HEADER rtsBool emptyInbox(Capability *cap);; * INLINE functions... private below here * -------------------------------------------------------------------------- */ -INLINE_HEADER void +EXTERN_INLINE void recordMutableCap (StgClosure *p, Capability *cap, nat gen) { bdescr *bd; @@ -310,7 +310,7 @@ recordMutableCap (StgClosure *p, Capability *cap, nat gen) *bd->free++ = (StgWord)p; } -INLINE_HEADER void +EXTERN_INLINE void recordClosureMutated (Capability *cap, StgClosure *p) { bdescr *bd;