rts/hooks/OnExit.c

   1 /* -----------------------------------------------------------------------------
   2  *
   3  * User-overridable RTS hooks.
   4  *
   5  * ---------------------------------------------------------------------------*/
   6
   7 #include "Rts.h"
   8
   9 /* Note: by the time this hook has been called, Haskell land
  10  * will have been shut down completely.
  11  *
  12  * ToDo: feed the hook info on whether we're shutting down as a result
  13  * of termination or run-time error ?
  14  */
  15
  16 void
  17 OnExitHook ()
  18 {
  19 }