rts/hooks/InitEachPE.c

   1 /* -----------------------------------------------------------------------------
   2  *
   3  * User-overridable RTS hooks.
   4  *
   5  * ---------------------------------------------------------------------------*/
   6
   7 #include "Rts.h"
   8
   9 #ifdef PAR
  10 void
  11 InitEachPEHook (void)
  12 { /* In a GUM setup this is called on each
  13      PE immediately before SynchroniseSystem.
  14      It can be used to read in static data
  15      to each PE which has to be available to
  16      each PE. See GPH-Maple as an example how to
  17      use this in combination with foreign language
  18      code:
  19        http://www.risc.uni-linz.ac.at/software/ghc-maple/
  20      -- HWL
  21   */
  22 }
  23 #endif