projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
[project @ 1996-01-18 16:33:17 by partain]
[ghc-hetmet.git]
/
ghc
/
runtime
/
io
/
posix.c
1
# line 7 "io/posix.lc"
2
3
#define NULL_REG_MAP
4
#include "stgdefs.h"
5
#include "stgio.h"
6
#include "libposix.h"
7
#include "signals.h"
8
9
int
10
cvtSignal(signum)
11
int signum;
12
{
13
switch(signum) {
14
default:
15
return signum;
16
case SIGABRT:
17
return GHC_SIGABRT;
18
case SIGALRM:
19
return GHC_SIGALRM;
20
case SIGFPE:
21
return GHC_SIGFPE;
22
case SIGHUP:
23
return GHC_SIGHUP;
24
case SIGILL:
25
return GHC_SIGILL;
26
case SIGINT:
27
return GHC_SIGINT;
28
case SIGKILL:
29
return GHC_SIGKILL;
30
case SIGPIPE:
31
return GHC_SIGPIPE;
32
case SIGQUIT:
33
return GHC_SIGQUIT;
34
case SIGSEGV:
35
return GHC_SIGSEGV;
36
case SIGTERM:
37
return GHC_SIGTERM;
38
case SIGUSR1:
39
return GHC_SIGUSR1;
40
case SIGUSR2:
41
return GHC_SIGUSR2;
42
case SIGCHLD:
43
return GHC_SIGCHLD;
44
case SIGCONT:
45
return GHC_SIGCONT;
46
case SIGSTOP:
47
return GHC_SIGSTOP;
48
case SIGTSTP:
49
return GHC_SIGTSTP;
50
case SIGTTIN:
51
return GHC_SIGTTIN;
52
case SIGTTOU:
53
return GHC_SIGTTOU;
54
}
55
}