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