Mercurial > emacs
annotate msdos/sigaction.c @ 71822:7b7a32c8c767
(CHECK_TYPE): New macro for generic type checking.
(CAR_SAFE, CDR_SAFE): New macros.
(ARRAYP, CHECK_ARRAY): New macros.
(CHECK_VECTOR_OR_STRING, CHECK_SUBR): New macros.
(CHECK_WINDOW_CONFIGURATION): New macro.
(CHECK_LIST_CONS, CHECK_LIST_END): New checks for list traversal.
(CHECK_STRING_OR_BUFFER, CHECK_HASH_TABLE, CHECK_LIST)
(CHECK_STRING, CHECK_STRING_CAR, CHECK_CONS, CHECK_SYMBOL)
(CHECK_CHAR_TABLE, CHECK_VECTOR, CHECK_VECTOR_OR_CHAR_TABLE)
(CHECK_BUFFER, CHECK_WINDOW, CHECK_LIVE_WINDOW, CHECK_PROCESS)
(CHECK_NUMBER, CHECK_NATNUM, CHECK_MARKER, CHECK_OVERLAY)
(CHECK_NUMBER_COERCE_MARKER, CHECK_FLOAT, CHECK_NUMBER_OR_FLOAT)
(CHECK_NUMBER_OR_FLOAT_COERCE_MARKER): Use CHECK_TYPE.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 12 Jul 2006 13:13:44 +0000 |
parents | 695cf19ef79e |
children | 60ed74508594 375f2633d815 |
rev | line source |
---|---|
25856 | 1 /* Copyright (C) 1995 DJ Delorie, see COPYING.DJ for details */ |
2 #include <signal.h> | |
3 #include <errno.h> | |
4 | |
5 int | |
6 sigaction(int _sig, const struct sigaction *_act, struct sigaction *_oact) | |
7 { | |
8 int retval = 0; | |
9 | |
10 if (_oact) | |
11 { | |
12 void (*installed_sig)(int) = signal (_sig, SIG_IGN); | |
13 | |
14 /* FIXME */ | |
15 if (installed_sig == SIG_ERR) | |
16 { | |
17 retval = -1; | |
18 errno = EINVAL; | |
19 } | |
20 else | |
21 signal (_sig, installed_sig); | |
22 _oact->sa_handler = installed_sig; | |
23 retval = sigemptyset (&_oact->sa_mask); | |
24 _oact->sa_flags = 0; | |
25 } | |
26 if (_act) | |
27 { | |
28 if (signal (_sig, _act->sa_handler) == SIG_ERR) | |
29 { | |
30 retval = -1; | |
31 errno = EINVAL; | |
32 } | |
33 } | |
34 return 0; | |
35 } | |
36 | |
37 | |
38 | |
52401 | 39 /* arch-tag: 39526405-3d3a-44fe-af28-82a515e0c8e8 |
40 (do not change this comment) */ |