ghc/rts/Signals.h

   1 /* -----------------------------------------------------------------------------
   2  *
   3  * (c) The GHC Team, 1998-1999
   4  *
   5  * Signal processing / handling.
   6  *
   7  * ---------------------------------------------------------------------------*/
   8
   9 #if !defined(PAR) && !defined(mingw32_TARGET_OS)
  10 #define RTS_USER_SIGNALS 1
  11
  12 extern StgPtr pending_handler_buf[];
  13 extern StgPtr *next_pending_handler;
  14
  15 #define signals_pending() (next_pending_handler != pending_handler_buf)
  16
  17 extern void    initUserSignals(void);
  18 extern void    blockUserSignals(void);
  19 extern void    unblockUserSignals(void);
  20
  21 extern rtsBool anyUserHandlers(void);
  22 extern void    awaitUserSignals(void);
  23
  24 /* sig_install declared in PrimOps.h */
  25
  26 extern void startSignalHandlers(void);
  27 extern void markSignalHandlers (evac_fn evac);
  28 extern void initDefaultHandlers(void);
  29
  30 extern void handleSignalsInThisThread(void);
  31 extern void handleSignalsInPrevThread(void);
  32
  33 #elif defined(mingw32_TARGET_OS)
  34 #define RTS_USER_SIGNALS 1
  35 #include "win32/ConsoleHandler.h"
  36
  37 #else /* PAR */
  38 #define signals_pending() (rtsFalse)
  39 #define handleSignalsInThisThread() /* nothing */
  40
  41 #endif /* PAR */