X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FHooks.h;h=d172bc72a25b9200fd22b86b2336d2bf22ab771f;hb=ce469441dcadb13da3df062631945fd1a6148e43;hp=3a53f19991af16186d71aba6c7c9891526bdd62f;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git diff --git a/ghc/includes/Hooks.h b/ghc/includes/Hooks.h index 3a53f19..d172bc7 100644 --- a/ghc/includes/Hooks.h +++ b/ghc/includes/Hooks.h @@ -1,10 +1,14 @@ /* ----------------------------------------------------------------------------- - * $Id: Hooks.h,v 1.2 1998/12/02 13:21:08 simonm Exp $ + * $Id: Hooks.h,v 1.6 2001/10/01 11:36:28 simonmar 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); @@ -15,3 +19,7 @@ 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