summaryrefslogtreecommitdiff
path: root/ghc/rts/hooks/ShutdownEachPEHook.c
blob: f5e3ba9344e5ac97c75e94d5209c1f86533388a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
/* -----------------------------------------------------------------------------
 *
 * User-overridable RTS hooks.
 *
 * ---------------------------------------------------------------------------*/

#include "Rts.h"

#ifdef PAR
void
ShutdownEachPEHook (void)
{ /* In a GUM setup this routine is called at the end of 
     shutdownParallelSystem on each PE. Useful for
     cleaning up stuff, especially when interfacing 
     with foreign language code.
     -- HWL 
  */
}
#endif