1 /* ----------------------------------------------------------------------------- 2 * 3 * (c) The GHC Team, 1998-2009 4 * 5 * RTS signal handling 6 * 7 * Do not #include this file directly: #include "Rts.h" instead. 8 * 9 * To understand the structure of the RTS headers, see the wiki: 10 * http://ghc.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes 11 * 12 * ---------------------------------------------------------------------------*/ 13 14 #pragma once 15 16 /* Used by runProcess() in the process package 17 */ 18 19 /* 20 * Function: blockUserSignals() 21 * 22 * Temporarily block the delivery of further console events. Needed to 23 * avoid race conditions when GCing the queue of outstanding handlers or 24 * when emptying the queue by running the handlers. 25 * 26 */ 27 void blockUserSignals(void); 28 29 /* 30 * Function: unblockUserSignals() 31 * 32 * The inverse of blockUserSignals(); re-enable the deliver of console events. 33 */ 34 void unblockUserSignals(void); 35