Building GHC with hadrian on FreeBSD
[ghc.git] / rts / ThreadPaused.h
1 /* -----------------------------------------------------------------------------
2 *
3 * (c) The GHC Team 1998-2006
4 *
5 * Tidying up a thread when it stops running
6 *
7 * ---------------------------------------------------------------------------*/
8
9 #pragma once
10
11 #include "BeginPrivate.h"
12
13 RTS_PRIVATE void threadPaused ( Capability *cap, StgTSO * );
14
15 #include "EndPrivate.h"
16
17 #if defined(THREADED_RTS) && defined(PROF_SPIN)
18 extern volatile StgWord64 whitehole_threadPaused_spin;
19 #endif