X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSchedule.h;h=5f669b3d83a7b33bd98bcf5b9b6868903953c313;hb=2fe38b5fb0957f9428864afd69ad3ccd82fae3d0;hp=2dd4acd0d99be8a63f8fa0736eca968272d581f9;hpb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;p=ghc-hetmet.git diff --git a/rts/Schedule.h b/rts/Schedule.h index 2dd4acd..5f669b3 100644 --- a/rts/Schedule.h +++ b/rts/Schedule.h @@ -126,7 +126,10 @@ void performPendingThrowTos (StgTSO *); * NOTE: tso->link should be END_TSO_QUEUE before calling this macro. * ASSUMES: cap->running_task is the current task. */ -INLINE_HEADER void +EXTERN_INLINE void +appendToRunQueue (Capability *cap, StgTSO *tso); + +EXTERN_INLINE void appendToRunQueue (Capability *cap, StgTSO *tso) { ASSERT(tso->_link == END_TSO_QUEUE);