[project @ 1998-06-29 17:49:05 by sof]
[ghc-hetmet.git] / ghc / includes / stgdefs.h
index 7170d42..f07689c 100644 (file)
@@ -224,6 +224,7 @@ StgFunPtr impossible_jump_after_switch(STG_NO_ARGS);
 /* hooks: user might write some of their own */
 void ErrorHdrHook      PROTO((FILE *));
 void OutOfHeapHook     PROTO((W_, W_));
+void OnExitHook         (STG_NO_ARGS);
 void StackOverflowHook PROTO((I_));
 #ifdef CONCURRENT
 int NoRunnableThreadsHook (STG_NO_ARGS);