X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FHooks.h;h=a448979525ec08995f25121732663aecc0c1c932;hb=a20ec0ced36bca7cd0594528922dbe31a6186eae;hp=8db74f7197368570574404fbff5c3957af15acaa;hpb=3ddff2383b0f43e29b8edf52a5087ceef958a1a2;p=ghc-hetmet.git diff --git a/ghc/includes/Hooks.h b/ghc/includes/Hooks.h index 8db74f7..a448979 100644 --- a/ghc/includes/Hooks.h +++ b/ghc/includes/Hooks.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Hooks.h,v 1.5 2001/04/01 05:56:29 chak Exp $ + * $Id: Hooks.h,v 1.7 2004/02/15 13:29:44 krasimir Exp $ * * (c) The GHC Team, 1998-1999 * @@ -7,16 +7,14 @@ * * ---------------------------------------------------------------------------*/ +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);