[project @ 1996-06-27 16:13:29 by partain]

[ghc-hetmet.git] / ghc / runtime / hooks / InitEachPE.lc

diff --git a/ghc/runtime/hooks/InitEachPE.lc b/ghc/runtime/hooks/InitEachPE.lc
new file mode 100644 (file)
index 0000000..029784d
--- /dev/null
+++ b/ghc/runtime/hooks/InitEachPE.lc
@@ -0,0 +1,18 @@
+\begin{code}
+#include "rtsdefs.h"
+
+void
+initEachPEHook (void)
+{ /* in a GUM setup this is called on each
+     PE immediately before SynchroniseSystem
+     it can be used to read in static data 
+     to each PE which has to be available to
+     each PE
+
+     This version is the one specialised 
+     for Lolita, calling the LoadAllData stuff.
+     The default version probably should do 
+     nothing -- HWL
+  */
+}
+\end{code}