Mercurial > hg > xemacs-beta

comparison src/process.h @ 424:11054d720c21 r21-2-20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-20
author cvs
date Mon, 13 Aug 2007 11:26:11 +0200
parents 697ef44129c6
children
comparison
equal deleted inserted replaced
423:28d9c139be4c 424:11054d720c21
42 42
43 DECLARE_LRECORD (process, struct Lisp_Process); 43 DECLARE_LRECORD (process, struct Lisp_Process);
44 #define XPROCESS(x) XRECORD (x, process, struct Lisp_Process) 44 #define XPROCESS(x) XRECORD (x, process, struct Lisp_Process)
45 #define XSETPROCESS(x, p) XSETRECORD (x, p, process) 45 #define XSETPROCESS(x, p) XSETRECORD (x, p, process)
46 #define PROCESSP(x) RECORDP (x, process) 46 #define PROCESSP(x) RECORDP (x, process)
47 #define GC_PROCESSP(x) GC_RECORDP (x, process)
48 #define CHECK_PROCESS(x) CHECK_RECORD (x, process) 47 #define CHECK_PROCESS(x) CHECK_RECORD (x, process)
49 #define PROCESS_LIVE_P(x) (!NILP (XPROCESS(x)->pipe_instream)) 48 #define PROCESS_LIVE_P(x) (!NILP (XPROCESS(x)->pipe_instream))
50 49
51 #ifdef emacs 50 #ifdef emacs
52 51
91 int network_connection_p (Lisp_Object process); 90 int network_connection_p (Lisp_Object process);
92 #else 91 #else
93 #define network_connection_p(x) 0 92 #define network_connection_p(x) 0
94 #endif 93 #endif
95 94
96 extern Lisp_Object Qclosed, Qmulticast, Qopen, Qrun, Qstop, Qtcpip; 95 extern Lisp_Object Qclosed, Qmulticast, Qopen, Qrun, Qstop, Qtcp, Qudp;
97 extern Lisp_Object Vprocess_connection_type, Vprocess_list; 96 extern Lisp_Object Vprocess_connection_type, Vprocess_list;
98 97
99 /* Report all recent events of a change in process status 98 /* Report all recent events of a change in process status
100 (either run the sentinel or output a message). 99 (either run the sentinel or output a message).
101 This is done while Emacs is waiting for keyboard input. */ 100 This is done while Emacs is waiting for keyboard input. */
132 #define EXEC_SUFFIXES "" 131 #define EXEC_SUFFIXES ""
133 #endif 132 #endif
134 133
135 #endif /* emacs */ 134 #endif /* emacs */
136 135
136 #ifdef HAVE_GETPT
137 #define PTY_ITERATION
138 #define PTY_OPEN \
139 if ((fd = getpt()) < 0 || grantpt (fd) < 0 || unlockpt (fd) < 0) \
140 return -1;
141 #define PTY_NAME_SPRINTF
142 #define PTY_TTY_NAME_SPRINTF strcpy (pty_name, ptsname (fd));
143 #endif
144
137 #endif /* _XEMACS_PROCESS_H_ */ 145 #endif /* _XEMACS_PROCESS_H_ */