X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FSignals.h;h=ffcac5562d04f6fead4b3253c7b05eca9e61dce4;hb=824d7fa06fc3967a237866b699faab07fff3a6f6;hp=4db8086e1bdfd2cd59082f36ea80dd87c1039f4d;hpb=af13609607da81e7837a7c7c598de82452363ab5;p=ghc-hetmet.git diff --git a/ghc/rts/Signals.h b/ghc/rts/Signals.h index 4db8086..ffcac55 100644 --- a/ghc/rts/Signals.h +++ b/ghc/rts/Signals.h @@ -1,5 +1,4 @@ /* ----------------------------------------------------------------------------- - * $Id: Signals.h,v 1.9 2003/01/25 15:54:50 wolfgang Exp $ * * (c) The GHC Team, 1998-1999 * @@ -7,7 +6,8 @@ * * ---------------------------------------------------------------------------*/ -#ifndef PAR +#if !defined(PAR) && !defined(mingw32_HOST_OS) +#define RTS_USER_SIGNALS 1 extern StgPtr pending_handler_buf[]; extern StgPtr *next_pending_handler; @@ -28,9 +28,14 @@ extern void markSignalHandlers (evac_fn evac); extern void initDefaultHandlers(void); extern void handleSignalsInThisThread(void); +extern void handleSignalsInPrevThread(void); -#else +#elif defined(mingw32_HOST_OS) +#define RTS_USER_SIGNALS 1 +#include "win32/ConsoleHandler.h" +#else /* PAR */ #define signals_pending() (rtsFalse) +#define handleSignalsInThisThread() /* nothing */ #endif /* PAR */