X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSchedule.h;h=edba8f5f16e2e9b0ebdc1bd2e7ed7fb4e6bd8b50;hb=26f4bfc82f2b2359259578e9c54d476fc2de650f;hp=a00d81af4f494388e972deac2542de88067d5699;hpb=51b85031ce99f1e9d4c72249d6d85672188f0fbd;p=ghc-hetmet.git diff --git a/rts/Schedule.h b/rts/Schedule.h index a00d81a..edba8f5 100644 --- a/rts/Schedule.h +++ b/rts/Schedule.h @@ -44,7 +44,7 @@ void wakeUpRts(void); StgWord raiseExceptionHelper (StgRegTable *reg, StgTSO *tso, StgClosure *exception); /* findRetryFrameHelper */ -StgWord findRetryFrameHelper (StgTSO *tso); +StgWord findRetryFrameHelper (Capability *cap, StgTSO *tso); /* Entry point for a new worker */ void scheduleWorker (Capability *cap, Task *task);