X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/6e66744d4c4bd94bb7e34f4243de0213334a31c5..d675db9:/src/process.h
diff --git a/src/process.h b/src/process.h
index 56c0f6d630..8d9f8f4c07 100644
--- a/src/process.h
+++ b/src/process.h
@@ -1,5 +1,5 @@
/* Definitions for asynchronous process control in GNU Emacs.
- Copyright (C) 1985, 1994, 2001-2014 Free Software Foundation, Inc.
+ Copyright (C) 1985, 1994, 2001-2016 Free Software Foundation, Inc.
This file is part of GNU Emacs.
@@ -16,6 +16,9 @@ GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GNU Emacs. If not, see . */
+#ifndef EMACS_PROCESS_H
+#define EMACS_PROCESS_H
+
#ifdef HAVE_SYS_TYPES_H
#include
#endif
@@ -43,25 +46,25 @@ struct Lisp_Process
/* Name of subprocess terminal. */
Lisp_Object tty_name;
- /* Name of this process */
+ /* Name of this process. */
Lisp_Object name;
/* List of command arguments that this process was run with.
- Is set to t for a stopped network process; nil otherwise. */
+ Is set to t for a stopped network process; nil otherwise. */
Lisp_Object command;
/* (funcall FILTER PROC STRING) (if FILTER is non-nil)
- to dispose of a bunch of chars from the process all at once */
+ to dispose of a bunch of chars from the process all at once. */
Lisp_Object filter;
- /* (funcall SENTINEL PROCESS) when process state changes */
+ /* (funcall SENTINEL PROCESS) when process state changes. */
Lisp_Object sentinel;
/* (funcall LOG SERVER CLIENT MESSAGE) when a server process
accepts a connection from a client. */
Lisp_Object log;
- /* Buffer that output is going to */
+ /* Buffer that output is going to. */
Lisp_Object buffer;
/* t if this is a real child process. For a network or serial
@@ -73,10 +76,10 @@ struct Lisp_Process
/* Plist for programs to keep per-process state information, parameters, etc. */
Lisp_Object plist;
- /* Symbol indicating the type of process: real, network, serial */
+ /* Symbol indicating the type of process: real, network, serial. */
Lisp_Object type;
- /* Marker set to end of last buffer-inserted output from this process */
+ /* Marker set to end of last buffer-inserted output from this process. */
Lisp_Object mark;
/* Symbol indicating status of process.
@@ -98,13 +101,16 @@ struct Lisp_Process
/* Working buffer for encoding. */
Lisp_Object encoding_buf;
- /* Queue for storing waiting writes */
+ /* Queue for storing waiting writes. */
Lisp_Object write_queue;
#ifdef HAVE_GNUTLS
Lisp_Object gnutls_cred_type;
#endif
+ /* Pipe process attached to the standard error of this process. */
+ Lisp_Object stderrproc;
+
/* After this point, there are no Lisp_Objects any more. */
/* alloc.c assumes that `pid' is the first such non-Lisp slot. */
@@ -113,9 +119,9 @@ struct Lisp_Process
A value 0 is used for pseudo-processes such as network or serial
connections. */
pid_t pid;
- /* Descriptor by which we read from this process */
+ /* Descriptor by which we read from this process. */
int infd;
- /* Descriptor by which we write to this process */
+ /* Descriptor by which we write to this process. */
int outfd;
/* Descriptors that were created for this process and that need
closing. Unused entries are negative. */
@@ -197,15 +203,6 @@ pset_gnutls_cred_type (struct Lisp_Process *p, Lisp_Object val)
when exiting. */
extern bool inhibit_sentinels;
-extern Lisp_Object Qeuid, Qegid, Qcomm, Qstate, Qppid, Qpgrp, Qsess, Qttname;
-extern Lisp_Object Qminflt, Qmajflt, Qcminflt, Qcmajflt, Qutime, Qstime;
-extern Lisp_Object Qcutime, Qpri, Qnice, Qthcount, Qstart, Qvsize, Qrss, Qargs;
-extern Lisp_Object Quser, Qgroup, Qetime, Qpcpu, Qpmem, Qtpgid, Qcstime;
-extern Lisp_Object Qtime, Qctime;
-extern Lisp_Object QCspeed;
-extern Lisp_Object QCbytesize, QCstopbits, QCparity, Qodd, Qeven;
-extern Lisp_Object QCflowcontrol, Qhw, Qsw, QCsummary;
-
/* Exit statuses for GNU programs that exec other programs. */
enum
{
@@ -246,4 +243,8 @@ extern Lisp_Object network_interface_list (void);
extern Lisp_Object network_interface_info (Lisp_Object);
#endif
+extern Lisp_Object remove_slash_colon (Lisp_Object);
+
INLINE_HEADER_END
+
+#endif /* EMACS_PROCESS_H */