X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FSignals.h;h=331810154c9d55293c7d885f0eac3b463e13944d;hb=1897bcd13d6851873340778524f7248a057d3027;hp=0127ce583503d53f0ab21b89bc8ee1b7ee5df24b;hpb=1862438e1e29c4f4069d9ca43b25445078547faa;p=ghc-hetmet.git diff --git a/ghc/rts/Signals.h b/ghc/rts/Signals.h index 0127ce5..3318101 100644 --- a/ghc/rts/Signals.h +++ b/ghc/rts/Signals.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Signals.h,v 1.4 1999/09/22 11:53:33 sof Exp $ + * $Id: Signals.h,v 1.11 2003/04/01 15:05:22 sof Exp $ * * (c) The GHC Team, 1998-1999 * @@ -7,25 +7,32 @@ * * ---------------------------------------------------------------------------*/ -#ifndef PAR +#if !defined(PAR) && !defined(mingw32_TARGET_OS) +#define RTS_USER_SIGNALS 1 extern StgPtr pending_handler_buf[]; extern StgPtr *next_pending_handler; #define signals_pending() (next_pending_handler != pending_handler_buf) -extern void initUserSignals(void); -extern void blockUserSignals(void); -extern void unblockUserSignals(void); +extern void initUserSignals(void); +extern void blockUserSignals(void); +extern void unblockUserSignals(void); + +extern rtsBool anyUserHandlers(void); +extern void awaitUserSignals(void); /* sig_install declared in PrimOps.h */ -extern void start_signal_handlers(void); +extern void startSignalHandlers(void); +extern void markSignalHandlers (evac_fn evac); +extern void initDefaultHandlers(void); -extern void init_shutdown_handler(void); +extern void handleSignalsInThisThread(void); #else #define signals_pending() (rtsFalse) +#define handleSignalsInThisThread() /* nothing */ -#endif /* PAR */ +#endif /* !PAR && !mingw32_TARGET_OS */