[project @ 2005-03-27 13:41:13 by panne]

[ghc-hetmet.git] / ghc / includes / Hooks.h

diff --git a/ghc/includes/Hooks.h b/ghc/includes/Hooks.h
index 3a53f19..38014cc 100644 (file)
--- a/ghc/includes/Hooks.h
+++ b/ghc/includes/Hooks.h
@@ -1,17 +1,20 @@
 /* -----------------------------------------------------------------------------
- * $Id: Hooks.h,v 1.2 1998/12/02 13:21:08 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
  *
  * User-overridable RTS hooks.
  *
  * ---------------------------------------------------------------------------*/
 
+extern char *ghc_rts_opts;
+
 extern void OnExitHook (void);
-extern void ErrorHdrHook (long fd);
 extern int  NoRunnableThreadsHook (void);
 extern void StackOverflowHook (unsigned long stack_size);
 extern void OutOfHeapHook (unsigned long request_size, unsigned long heap_size);
 extern void MallocFailHook (unsigned long request_size /* in bytes */, char *msg);
-extern void PatErrorHdrHook (long fd);
 extern void defaultsHook (void);
-extern void PreTraceHook (long fd);
-extern void PostTraceHook (long fd);
+#if defined(PAR)
+extern void InitEachPEHook (void);
+extern void ShutdownEachPEHook (void);
+#endif