X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/14beddf4711854b01d400f36166dc71eb39435bb..2ba8e0088836fa1bfec2bdd6c92159b7805c399d:/src/process.h diff --git a/src/process.h b/src/process.h index 6bf1084afc..aff9e970f6 100644 --- a/src/process.h +++ b/src/process.h @@ -29,13 +29,13 @@ along with GNU Emacs. If not, see . */ /* This structure records information about a subprocess or network connection. - Every field in this structure except for the first two + Every field in this structure except for the header must be a Lisp_Object, for GC's sake. */ struct Lisp_Process { - EMACS_UINT size; - struct Lisp_Vector *v_next; + struct vectorlike_header header; + /* Name of subprocess terminal. */ Lisp_Object tty_name; /* Name of this process */ @@ -141,13 +141,7 @@ struct Lisp_Process /* Every field in the preceding structure except for the first two must be a Lisp_Object, for GC's sake. */ -#define ChannelMask(n) (1<<(n)) - -/* Indexed by descriptor, gives the process (if any) for that descriptor. */ -extern Lisp_Object chan_process[]; - -/* Alist of elements (NAME . PROCESS). */ -extern Lisp_Object Vprocess_alist; +#define ChannelMask(n) (1 << (n)) /* True if we are about to fork off a synchronous process or if we are waiting for it. */ @@ -181,7 +175,7 @@ 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 QCport, QCspeed, QCprocess; +extern Lisp_Object QCspeed; extern Lisp_Object QCbytesize, QCstopbits, QCparity, Qodd, Qeven; extern Lisp_Object QCflowcontrol, Qhw, Qsw, QCsummary; @@ -198,4 +192,3 @@ extern void add_read_fd (int fd, fd_callback func, void *data); extern void delete_read_fd (int fd); extern void add_write_fd (int fd, fd_callback func, void *data); extern void delete_write_fd (int fd); -