annotate msdos/sigaction.c @ 49459:06b77df47802

* mh-e: Created directory. ChangeLog will appear in a week when we release version 7.2. * lisp/mail/mh-alias.el, lisp/mail/mh-comp.el, lisp/mail/mh-customize.el, lisp/mail/mh-e.el, lisp/mail/mh-funcs.el, lisp/mail/mh-identity.el, lisp/mail/mh-index.el, lisp/mail/mh-loaddefs.el, lisp/mail/mh-mime.el, lisp/mail/mh-pick.el, lisp/mail/mh-seq.el, lisp/mail/mh-speed.el, lisp/mail/mh-utils.el, lisp/mail/mh-xemacs-compat.el: Moved to mh-e. Note that reply2.pbm and reply2.xpm, which were created by the MH-E package, were left in mail since they can probably be used by other mail packages. * makefile.w32-in (WINS): Added mh-e. * makefile.nt (WINS): Added mh-e.
author Bill Wohler <wohler@newt.com>
date Sun, 26 Jan 2003 02:38:37 +0000
parents 354e0c45cedf
children 695cf19ef79e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25856
Dave Love <fx@gnu.org>
parents:
diff changeset
1 /* Copyright (C) 1995 DJ Delorie, see COPYING.DJ for details */
Dave Love <fx@gnu.org>
parents:
diff changeset
2 #include <signal.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
3 #include <errno.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
4
Dave Love <fx@gnu.org>
parents:
diff changeset
5 int
Dave Love <fx@gnu.org>
parents:
diff changeset
6 sigaction(int _sig, const struct sigaction *_act, struct sigaction *_oact)
Dave Love <fx@gnu.org>
parents:
diff changeset
7 {
Dave Love <fx@gnu.org>
parents:
diff changeset
8 int retval = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
9
Dave Love <fx@gnu.org>
parents:
diff changeset
10 if (_oact)
Dave Love <fx@gnu.org>
parents:
diff changeset
11 {
Dave Love <fx@gnu.org>
parents:
diff changeset
12 void (*installed_sig)(int) = signal (_sig, SIG_IGN);
Dave Love <fx@gnu.org>
parents:
diff changeset
13
Dave Love <fx@gnu.org>
parents:
diff changeset
14 /* FIXME */
Dave Love <fx@gnu.org>
parents:
diff changeset
15 if (installed_sig == SIG_ERR)
Dave Love <fx@gnu.org>
parents:
diff changeset
16 {
Dave Love <fx@gnu.org>
parents:
diff changeset
17 retval = -1;
Dave Love <fx@gnu.org>
parents:
diff changeset
18 errno = EINVAL;
Dave Love <fx@gnu.org>
parents:
diff changeset
19 }
Dave Love <fx@gnu.org>
parents:
diff changeset
20 else
Dave Love <fx@gnu.org>
parents:
diff changeset
21 signal (_sig, installed_sig);
Dave Love <fx@gnu.org>
parents:
diff changeset
22 _oact->sa_handler = installed_sig;
Dave Love <fx@gnu.org>
parents:
diff changeset
23 retval = sigemptyset (&_oact->sa_mask);
Dave Love <fx@gnu.org>
parents:
diff changeset
24 _oact->sa_flags = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
25 }
Dave Love <fx@gnu.org>
parents:
diff changeset
26 if (_act)
Dave Love <fx@gnu.org>
parents:
diff changeset
27 {
Dave Love <fx@gnu.org>
parents:
diff changeset
28 if (signal (_sig, _act->sa_handler) == SIG_ERR)
Dave Love <fx@gnu.org>
parents:
diff changeset
29 {
Dave Love <fx@gnu.org>
parents:
diff changeset
30 retval = -1;
Dave Love <fx@gnu.org>
parents:
diff changeset
31 errno = EINVAL;
Dave Love <fx@gnu.org>
parents:
diff changeset
32 }
Dave Love <fx@gnu.org>
parents:
diff changeset
33 }
Dave Love <fx@gnu.org>
parents:
diff changeset
34 return 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
35 }
Dave Love <fx@gnu.org>
parents:
diff changeset
36
Dave Love <fx@gnu.org>
parents:
diff changeset
37
Dave Love <fx@gnu.org>
parents:
diff changeset
38