ghc/rts/hooks/InitEachPE.c

   1 /* -----------------------------------------------------------------------------
   2  * $Id: InitEachPE.c,v 1.2 1998/12/02 13:29:12 simonm Exp $
   3  *
   4  * User-overridable RTS hooks.
   5  *
   6  * ---------------------------------------------------------------------------*/
   7
   8 #include "Rts.h"
   9
  10 #ifdef PAR
  11 void
  12 initEachPEHook (void)
  13 { /* in a GUM setup this is called on each
  14      PE immediately before SynchroniseSystem
  15      it can be used to read in static data
  16      to each PE which has to be available to
  17      each PE
  18
  19      This version is the one specialised
  20      for Lolita, calling the LoadAllData stuff.
  21      The default version probably should do
  22      nothing -- HWL
  23   */
  24 }
  25 #endif