ghc/rts/hooks/InitEachPE.c

   1 /* -----------------------------------------------------------------------------
   2  * $Id: InitEachPE.c,v 1.3 2001/03/22 03:51:11 hwloidl 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. See GPH-Maple as an example how to
  18      use this in combination with foreign language
  19      code:
  20        http://www.risc.uni-linz.ac.at/software/ghc-maple/
  21      -- HWL
  22   */
  23 }
  24 #endif