annotate src/sysproc.h @ 5773:94a6b8fbd56e

Use a face, show more context around open parenthesis, #'blink-matching-open lisp/ChangeLog addition: 2013-12-17 Aidan Kehoe <kehoea@parhasard.net> * simple.el (blink-matching-open): When showing the opening parenthesis in the minibiffer, use the isearch face for it, in case there are multiple parentheses in the text shown. When writing moderately involved macros, it's often not enough just to show the backquote context before the parenthesis (e.g. @,.`). Skip over that when searching for useful context in the same way we skip over space and tab. * simple.el (message): * simple.el (lmessage): If there are no ARGS, don't call #'format. This allows extent information to be passed through to the minibuffer. It's probably better still to update #'format to preserve extent info.
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 17 Dec 2013 20:49:52 +0200
parents 611a6845ebee
children b58b74274fa2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 /*
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
2 Copyright (C) 1995 Free Software Foundation, Inc.
853
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
3 Copyright (C) 2000, 2002 Ben Wing.
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
5 This file is part of XEmacs.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 4759
diff changeset
7 XEmacs is free software: you can redistribute it and/or modify it
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 4759
diff changeset
9 Free Software Foundation, either version 3 of the License, or (at your
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 4759
diff changeset
10 option) any later version.
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12 XEmacs is distributed in the hope that it will be useful, but WITHOUT
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
15 for more details.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
16
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
5402
308d34e9f07d Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents: 4759
diff changeset
18 along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 /* Synched up with: Not really in FSF. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
22 #ifndef INCLUDED_sysproc_h_
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
23 #define INCLUDED_sysproc_h_
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
24
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
25 #include "systime.h" /* necessary for sys/resource.h; also gets the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26 FD_* defines on some systems. */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
27 #ifndef WIN32_NATIVE
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
28 #include <sys/resource.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
29 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
30
771
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
31 #ifdef MINGW
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
32 #include <../mingw/process.h>
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
33 #elif defined (WIN32_NATIVE)
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
34 /* <process.h> should not conflict with "process.h", as per ANSI definition.
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
35 This is not true with visual c though. The trick below works with
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
36 VC4.2b, 5.0 and 6.0. It assumes that VC is installed in a kind of
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
37 standard way, so include path ends with /include.
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
38 */
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
39 #include <../include/process.h>
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
40 #endif
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
41
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
42 #ifdef HAVE_SOCKETS /* TCP connection support, if kernel can do it */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
43 # include <sys/types.h> /* AJK */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
44 # ifndef WIN32_NATIVE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
45 # include <sys/socket.h>
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
46 # include <netdb.h>
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
47 # include <netinet/in.h>
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
48 # include <arpa/inet.h>
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
49 # endif
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
50 #endif /* HAVE_SOCKETS */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
51
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
52 #ifdef WIN32_NATIVE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
53 /* Note: winsock.h already included in systime.h above */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
54 /* map winsock error codes to standard names */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
55 #define EWOULDBLOCK WSAEWOULDBLOCK
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
56 #define EINPROGRESS WSAEINPROGRESS
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
57 #define EALREADY WSAEALREADY
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
58 #define ENOTSOCK WSAENOTSOCK
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
59 #define EDESTADDRREQ WSAEDESTADDRREQ
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
60 #define EMSGSIZE WSAEMSGSIZE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
61 #define EPROTOTYPE WSAEPROTOTYPE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
62 #define ENOPROTOOPT WSAENOPROTOOPT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
63 #define EPROTONOSUPPORT WSAEPROTONOSUPPORT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
64 #define ESOCKTNOSUPPORT WSAESOCKTNOSUPPORT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
65 #define EOPNOTSUPP WSAEOPNOTSUPP
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
66 #define EPFNOSUPPORT WSAEPFNOSUPPORT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
67 #define EAFNOSUPPORT WSAEAFNOSUPPORT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
68 #define EADDRINUSE WSAEADDRINUSE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
69 #define EADDRNOTAVAIL WSAEADDRNOTAVAIL
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
70 #define ENETDOWN WSAENETDOWN
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
71 #define ENETUNREACH WSAENETUNREACH
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
72 #define ENETRESET WSAENETRESET
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
73 #define ECONNABORTED WSAECONNABORTED
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
74 #define ECONNRESET WSAECONNRESET
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
75 #define ENOBUFS WSAENOBUFS
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
76 #define EISCONN WSAEISCONN
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
77 #define ENOTCONN WSAENOTCONN
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
78 #define ESHUTDOWN WSAESHUTDOWN
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
79 #define ETOOMANYREFS WSAETOOMANYREFS
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
80 #define ETIMEDOUT WSAETIMEDOUT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
81 #define ECONNREFUSED WSAECONNREFUSED
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
82 #define ELOOP WSAELOOP
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
83 /* #define ENAMETOOLONG WSAENAMETOOLONG */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
84 #define EHOSTDOWN WSAEHOSTDOWN
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
85 #define EHOSTUNREACH WSAEHOSTUNREACH
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
86 /* #define ENOTEMPTY WSAENOTEMPTY */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
87 #define EPROCLIM WSAEPROCLIM
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
88 #define EUSERS WSAEUSERS
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
89 #define EDQUOT WSAEDQUOT
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
90 #define ESTALE WSAESTALE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
91 #define EREMOTE WSAEREMOTE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
92 #endif /* WIN32_NATIVE */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
93
3025
facf3239ba30 [xemacs-hg @ 2005-10-25 11:16:19 by ben]
ben
parents: 2563
diff changeset
94 /* On some systems, e.g. DGUX, inet_addr returns a `struct in_addr'. */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
95 #ifdef HAVE_BROKEN_INET_ADDR
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
96 # define IN_ADDR struct in_addr
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
97 # define NUMERIC_ADDR_ERROR (numeric_addr.s_addr == -1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
98 #else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
99 # if (LONGBITS > 32)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
100 # define IN_ADDR unsigned int
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
101 # else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
102 # define IN_ADDR unsigned long
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
103 # endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
104 # define NUMERIC_ADDR_ERROR (numeric_addr == (IN_ADDR) -1)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
105 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
106
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
107 /* Define first descriptor number available for subprocesses. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
108 #define FIRST_PROC_DESC 3
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
109
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
110 #ifdef AIX
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
111 #include <sys/select.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
112 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
113
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
114 #ifdef HAVE_STROPTS_H
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
115 #include <stropts.h> /* isastream(), I_PUSH */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
116 #endif
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
117
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
118 #ifdef HAVE_STRTIO_H
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
119 #include <strtio.h> /* TIOCSIGNAL */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
120 #endif
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
121
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
122 #ifdef HAVE_PTY_H
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
123 #include <pty.h> /* openpty() on Tru64, Linux */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
124 #endif
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
125
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
126 #ifdef HAVE_LIBUTIL_H
458
c33ae14dd6d0 Import from CVS: tag r21-2-44
cvs
parents: 444
diff changeset
127 #include <libutil.h> /* openpty() on FreeBSD */
c33ae14dd6d0 Import from CVS: tag r21-2-44
cvs
parents: 444
diff changeset
128 #endif
c33ae14dd6d0 Import from CVS: tag r21-2-44
cvs
parents: 444
diff changeset
129
c33ae14dd6d0 Import from CVS: tag r21-2-44
cvs
parents: 444
diff changeset
130 #ifdef HAVE_UTIL_H
c33ae14dd6d0 Import from CVS: tag r21-2-44
cvs
parents: 444
diff changeset
131 #include <util.h> /* openpty() on NetBSD */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
132 #endif
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
133
2286
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
134 /* The FD_* macros expand to __extension__ forms on glibc-based systems. Uno
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
135 does not understand such forms, so let's help it out. */
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
136 #ifdef UNO
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
137 #undef FD_SET
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
138 #undef FD_CLR
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
139 #undef FD_ISSET
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
140 #undef FD_ZERO
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
141 #undef MAXDESC
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
142 #undef SELECT_TYPE
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
143 #endif /* UNO */
04bc9d2f42c7 [xemacs-hg @ 2004-09-20 19:18:55 by james]
james
parents: 867
diff changeset
144
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
145 #ifdef FD_SET
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
146
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
147 /* We could get this from param.h, but better not to depend on finding that.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
148 And better not to risk that it might define other symbols used in this
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
149 file. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
150 # ifdef FD_SETSIZE
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
151 # define MAXDESC FD_SETSIZE
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
152 # else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
153 # define MAXDESC 64
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
154 # endif /* FD_SETSIZE */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
155 # define SELECT_TYPE fd_set
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
156
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
157 #else /* no FD_SET */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
158
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
159 # define MAXDESC 32
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
160 # define SELECT_TYPE int
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
161
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
162 /* Define the macros to access a single-int bitmap of descriptors. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
163 # define FD_SET(n, p) (*(p) |= (1 << (n)))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
164 # define FD_CLR(n, p) (*(p) &= ~(1 << (n)))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
165 # define FD_ISSET(n, p) (*(p) & (1 << (n)))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
166 # define FD_ZERO(p) (*(p) = 0)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
167
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
168 #endif /* no FD_SET */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
169
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
170 int poll_fds_for_input (SELECT_TYPE mask);
867
804517e16990 [xemacs-hg @ 2002-06-05 09:54:39 by ben]
ben
parents: 859
diff changeset
171 int qxe_execve (const Ibyte *filename, Ibyte * const argv[],
804517e16990 [xemacs-hg @ 2002-06-05 09:54:39 by ben]
ben
parents: 859
diff changeset
172 Ibyte * const envp[]);
771
943eaba38521 [xemacs-hg @ 2002-03-13 08:51:24 by ben]
ben
parents: 458
diff changeset
173 pid_t qxe_getpid (void);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
174
853
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
175 /* #### I would really like to delete the remaining synchronous code entirely.
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
176 We are now using it only for *REALLY* old systems -- how many systems
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
177 nowadays
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
178
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
179 (a) lack job control, or
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
180 (b) lack mkdir() or rmdir()
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
181
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
182 ?????
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
183
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
184 --ben
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
185 */
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
186
859
84762348c6f9 [xemacs-hg @ 2002-06-01 08:06:46 by ben]
ben
parents: 854
diff changeset
187 #include "syssignal.h" /* needed for SIGTSTP */
854
1d8fb2eee1bb [xemacs-hg @ 2002-05-28 16:06:58 by didierv]
didierv
parents: 853
diff changeset
188
4759
aa5ed11f473b Remove support for obsolete systems. See xemacs-patches message with ID
Jerry James <james@xemacs.org>
parents: 3025
diff changeset
189 #if !defined (WIN32_NATIVE) && (!defined (SIGTSTP) || !defined (HAVE_MKDIR) || !defined (HAVE_RMDIR))
853
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
190
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
191 #define NEED_SYNC_PROCESS_CODE
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
192
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
193 /* True iff we are about to fork off a synchronous process or if we
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
194 are waiting for it. */
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
195 extern volatile int synch_process_alive;
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
196
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
197 /* Nonzero => this is a string explaining death of synchronous subprocess. */
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
198 extern const char *synch_process_death;
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
199
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
200 /* If synch_process_death is zero,
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
201 this is exit code of synchronous subprocess. */
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
202 extern int synch_process_retcode;
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
203
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
204 #endif
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
205
2b6fa2618f76 [xemacs-hg @ 2002-05-28 08:44:22 by ben]
ben
parents: 771
diff changeset
206
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 428
diff changeset
207 #endif /* INCLUDED_sysproc_h_ */