/* raiseExceptionHelper */
StgWord raiseExceptionHelper (StgTSO *tso, StgClosure *exception);
+/* findRetryFrameHelper */
+StgWord findRetryFrameHelper (StgTSO *tso);
+
/* awaitEvent(rtsBool wait)
*
* Checks for blocked threads that need to be woken.
/* Context switch flag.
* Locks required : sched_mutex
*/
-extern nat RTS_VAR(context_switch);
+extern int RTS_VAR(context_switch);
extern rtsBool RTS_VAR(interrupted);
/* In Select.c */