annotate msdos/sigaction.c @ 67171:35b9e081ceed

Remove useless leading * in defcustom docstrings. (save-completions-file-name): Use ~/.emacs.d if available. (completion-standard-syntax-table): Rename from cmpl-standard-syntax-table and fold initialization into declaration, thus removing cmpl-make-standard-completion-syntax-table. (completion-lisp-syntax-table, completion-c-syntax-table) (completion-fortran-syntax-table, completion-c-def-syntax-table): Idem. (cmpl-saved-syntax, cmpl-saved-point): Remove. (symbol-under-point, symbol-before-point) (symbol-under-or-before-point, symbol-before-point-for-complete) (add-completions-from-c-buffer): Use with-syntax-table. (make-completion): Don't return a list of completion entries. Update callers. (cmpl-prefix-entry-head, cmpl-prefix-entry-tail): Use defalias. (completion-initialize): Rename from initialize-completions. (completion-find-file-hook): Rename from cmpl-find-file-hook. (kill-emacs-save-completions): Collect stats here. (save-completions-to-file, load-completions-from-file): Use with-current-buffer. (completion-def-wrapper): Rename from def-completion-wrapper. Make it into a function. Move all calls to toplevel. (completion-lisp-mode-hook): New fun. (completion-c-mode-hook, completion-setup-fortran-mode): Set the syntax-table here. Use local-set-key. (completion-saved-bindings): New var. (dynamic-completion-mode): Make it into a proper minor mode. (load-completions-from-file): Remove unused var `num-uses'.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 28 Nov 2005 01:43:28 +0000
parents 695cf19ef79e
children 60ed74508594 375f2633d815
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
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 25856
diff changeset
39 /* arch-tag: 39526405-3d3a-44fe-af28-82a515e0c8e8
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 25856
diff changeset
40 (do not change this comment) */