X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FCapability.h;h=70acc15d473e83efa77a5a1d75cbb0b6c3c8bf5a;hb=85aa72b9dc6803685595936c61f3cab6faab815a;hp=dd6a7bee0c131f6c35f3ab54cc4f7b3dfad561cf;hpb=6f0dcafbc883c851aaf6d5a7c446ddaaebe23361;p=ghc-hetmet.git diff --git a/ghc/rts/Capability.h b/ghc/rts/Capability.h index dd6a7be..70acc15 100644 --- a/ghc/rts/Capability.h +++ b/ghc/rts/Capability.h @@ -39,9 +39,9 @@ extern nat rts_n_free_capabilities; extern nat rts_n_waiting_workers; extern void grabReturnCapability(Mutex* pMutex, Capability** pCap); -extern void yieldToReturningWorker(Mutex* pMutex, Capability** pCap); -extern void waitForWorkCapability(Mutex* pMutex, Capability** pCap, rtsBool runnable); - +extern void yieldToReturningWorker(Mutex* pMutex, Capability** pCap, Condition *pThreadCond); +extern void waitForWorkCapability(Mutex* pMutex, Capability** pCap, Condition *pThreadCond); +extern void passCapability(Mutex* pMutex, Capability* cap, Condition *pTargetThreadCond); static inline rtsBool needToYieldToReturningWorker(void) {