/* ----------------------------------------------------------------------------- * * (c) The GHC Team, 1998-1999 * * User-overridable RTS hooks. * * ---------------------------------------------------------------------------*/ #ifndef RTS_HOOKS_H #define RTS_HOOKS_H extern char *ghc_rts_opts; extern void OnExitHook (void); 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 defaultsHook (void); #endif /* RTS_HOOKS_H */