diff options
author | Simon Marlow <marlowsd@gmail.com> | 2012-10-01 11:48:14 +0100 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2013-01-25 20:54:39 +0000 |
commit | dc29d55b30d95f0838499fb48217e1d22e39d07d (patch) | |
tree | 226fbf943fdaa5209a77adc77295cad87a21ff4b /cbits | |
parent | af75e09945582b5e3b723f033216936121f3f65e (diff) |
Indicate whether a process dumped core in the ProcessStatus
The Bool field of Terminated is new, as is the documentation:
data ProcessStatus
= Exited ExitCode -- ^ the process exited by calling
-- @exit()@ or returning from @main@
| Terminated Signal Bool -- ^ the process was terminated by a
-- signal, the @Bool@ is @True@ if a core
-- dump was produced
| Stopped Signal -- ^ the process was stopped by a signal
deriving (Eq, Ord, Show)
This is an API change, hence will need a major version bump.
Diffstat (limited to 'cbits')
-rw-r--r-- | cbits/HsUnix.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/cbits/HsUnix.c b/cbits/HsUnix.c index aba5445..db97de2 100644 --- a/cbits/HsUnix.c +++ b/cbits/HsUnix.c @@ -14,6 +14,7 @@ int __hsunix_wifsignaled (int stat) { return WIFSIGNALED(stat); } int __hsunix_wtermsig (int stat) { return WTERMSIG(stat); } int __hsunix_wifstopped (int stat) { return WIFSTOPPED(stat); } int __hsunix_wstopsig (int stat) { return WSTOPSIG(stat); } +int __hsunix_wcoredump (int stat) { return WCOREDUMP(stat); } #ifdef HAVE_RTLDNEXT void *__hsunix_rtldNext (void) {return RTLD_NEXT;} |