annotate src/syssignal.h @ 1255:ff06503c93b4

* gud.el (gud-def): Doc fix. (gud-gdb-marker-filter, gud-sdb-marker-filter, gud-dbx-marker-filter): Rename the argument `s' or `str' to `string', and change all uses; these definitions were referring to `string', which is unbound in the lexical context, but which happens to end up being bound to the right thing by the caller, gud-filter. (sdb): Set comint-prompt-regexp, not comint-prompt-pattern; the latter doesn't exist. (gud-dbx-debugger-setup): Use the argument `f', not the variable `file', which happens to be bound in the caller. (gud-filter-insert): The variable `start' is never used. The variable `moving' is unnecessary. The variable `old-buffer' and the unwind-protect form are unneeded, since save-excursion can do their work. The binding of output-after-point should be done after switching to the process's buffer, not in whatever random buffer happens to be current when the process filter is called. There's no need to set the process mark if we've just inserted at its location using insert-before-markers. (gud-read-address): Don't bother setting the variable `result'; it is never used. * gud.el (gud-mode-map): Bind gud-refresh to C-c C-l, not C-c l; the latter is reserved for the user's purposes. * gud.el (gdb, sdb, dbx): Use C-c C-r ("resume") for continuing, instead of C-c C-c. C-c C-c should be comint-interrupt-subjob; it's important to have that available, and the C-c C-c binding is consistent with all the other comint-derived modes.
author Jim Blandy <jimb@redhat.com>
date Tue, 29 Sep 1992 07:45:05 +0000
parents 639afe138172
children f3c105f296b2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 /* syssignal.h - System-dependent definitions for signals.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
2 Copyright (C) 1992 Free Software Foundation, Inc.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4 This file is part of GNU Emacs.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
7 it under the terms of the GNU General Public License as published by
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
8 the Free Software Foundation; either version 1, or (at your option)
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
9 any later version.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 GNU General Public License for more details.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
19
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
20 #ifdef POSIX_SIGNALS
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21 #define SIGMASKTYPE sigset_t
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
22
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23 #define SIGEMPTYMASK (empty_mask)
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
24 #define SIGFULLMASK (full_mask)
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25 extern sigset_t empty_mask, full_mask, temp_mask;
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
26
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
27 /* POSIX pretty much destroys any possibility of writing sigmask as a
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
28 macro in standard C. */
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
29 #ifdef __GNUC__
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
30 #define sigmask(SIG) \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
31 ({ \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
32 sigset_t _mask; \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
33 sigemptyset (&_mask); \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
34 sigaddset (&_mask, SIG); \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
35 _mask; \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
36 })
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
37 #else
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
38 #define sigmask(SIG) (sys_sigmask (SIG))
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
39 #endif
624
2bb7f23b7ea5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 563
diff changeset
40
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
41 #define sigpause(SIG) sys_sigpause(SIG)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
42 #define sigblock(SIG) sys_sigblock(SIG)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
43 #define sigunblock(SIG) sys_sigunblock(SIG)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
44 #define sigsetmask(SIG) sys_sigsetmask(SIG)
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
45 #define sighold(SIG) ONLY_USED_IN_BSD_4_1
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
46 #define sigrelse(SIG) ONLY_USED_IN_BSD_4_1
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
47
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
48 int (*sys_signal (int signal_number, int (*action)())) ();
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
49 int sys_sigpause (int signal_number);
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
50 sigset_t sys_sigblock (sigset_t new_mask);
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
51 sigset_t sys_sigunblock (sigset_t new_mask);
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
52 sigset_t sys_sigsetmask (sigset_t new_mask);
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
53
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
54 #define sys_sigdel(MASK,SIG) sigdelset(&MASK,SIG)
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
55
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
56 #else /* not POSIX_SIGNALS */
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
57
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
58 #define sigunblock(SIG) \
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
59 { SIGMASKTYPE omask = sigblock (SIGEMPTYMASK); sigsetmask (omask & ~SIG); }
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
60
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
61 #endif /* not POSIX_SIGNALS */
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
62
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
63 #ifndef SIGMASKTYPE
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
64 #define SIGMASKTYPE int
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
65 #endif
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
66
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
67 #ifndef SIGEMPTYMASK
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
68 #define SIGEMPTYMASK (0)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
69 #endif
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
70
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
71 #ifndef SIGFULLMASK
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
72 #define SIGFULLMASK (0xffffffff)
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
73 #endif
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
74
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
75 #ifndef sigmask
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
76 #define sigmask(no) (1L << ((no) - 1))
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
77 #endif
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
78
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
79 #ifndef sigunblock
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
80 #define sigunblock(SIG) \
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
81 { SIGMASKTYPE omask = sigblock (SIGFULLMASK); sigsetmask (omask & ~SIG); }
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
82 #endif
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
83
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
84 /* It would be very nice if we could somehow clean up all this trash. */
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
85
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
86 #ifndef BSD4_1
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
87 #define sigfree() sigsetmask (SIGEMPTYMASK)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
88 #define sigholdx(sig) sigsetmask (sigmask (sig))
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
89 #define sigblockx(sig) sigblock (sigmask (sig))
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
90 #define sigunblockx(sig) sigblock (SIGEMPTYMASK)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
91 #define sigpausex(sig) sigpause (0)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
92 #endif /* not BSD4_1 */
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
93
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
94 #ifdef BSD4_1
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
95 #define SIGIO SIGTINT
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
96 /* sigfree and sigholdx are in sysdep.c */
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
97 #define sigblockx(sig) sighold (sig)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
98 #define sigunblockx(sig) sigrelse (sig)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
99 #define sigpausex(sig) sigpause (sig)
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
100 #endif /* BSD4_1 */
563
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
101
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
102 /* On bsd, [man says] kill does not accept a negative number to kill a pgrp.
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
103 Must do that using the killpg call. */
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
104 #ifdef BSD
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
105 #define EMACS_KILLPG(gid, signo) (killpg ( (gid), (signo)))
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
106 #else
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
107 #define EMACS_KILLPG(gid, signo) (kill (-(gid), (signo)))
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
108 #endif
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
109
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
110 /* Define SIGCHLD as an alias for SIGCLD. There are many conditionals
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
111 testing SIGCHLD. */
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
112 #ifndef VMS
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
113 #ifdef SIGCLD
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
114 #ifndef SIGCHLD
5080bb8d0593 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
115 #define SIGCHLD SIGCLD
637
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
116 #endif /* not SIGCHLD */
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
117 #endif /* SIGCLD */
639afe138172 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 624
diff changeset
118 #endif /* not VMS */