diff options
| author | Nicolas Trangez <ikke@nicolast.be> | 2014-04-23 20:06:15 +0200 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-04-27 08:05:18 -0500 |
| commit | 2439da08fb3525f94d340132dc698c36a102ab28 (patch) | |
| tree | c402cbf2e1e0be22287fdbe7bd5bb5a5ccf4955f | |
| parent | 53c8e6e3b7fc8266c8843b7fa8f1e22d4413bc81 (diff) | |
| download | haskell-2439da08fb3525f94d340132dc698c36a102ab28.tar.gz | |
Check return value of sigaction
Issue discovered by Coverity scan, CID 43142.
Signed-off-by: Austin Seipp <austin@well-typed.com>
(cherry picked from commit f2595fd9d03803874df792072292d792a2c03bce)
| -rw-r--r-- | rts/posix/Signals.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/rts/posix/Signals.c b/rts/posix/Signals.c index 01d5347ae7..f4a8341c6a 100644 --- a/rts/posix/Signals.c +++ b/rts/posix/Signals.c @@ -574,7 +574,9 @@ set_sigtstp_action (rtsBool handle) } sa.sa_flags = 0; sigemptyset(&sa.sa_mask); - sigaction(SIGTSTP, &sa, NULL); + if (sigaction(SIGTSTP, &sa, NULL) != 0) { + sysErrorBelch("warning: failed to install SIGTSTP handler"); + } } /* ----------------------------------------------------------------------------- |