Mercurial > hg > xemacs-beta

comparison src/process.c @ 862:278c743f1578

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-06-03 12:23:49 by ben] process fixes process.el: Create new process-synchronize-point to avoid dynamic binding problems. Fix editing bogosity in setting process sentinels. process.c: Don't invalidate the process marker after the process has died to make point synchronization in `call-process-internal' possible.
author ben
date Mon, 03 Jun 2002 12:24:14 +0000
parents 84762348c6f9
children 42375619fa45
comparison
equal deleted inserted replaced
861:9a116d92c011 862:278c743f1578
2159 2159
2160 static void 2160 static void
2161 remove_process (Lisp_Object process) 2161 remove_process (Lisp_Object process)
2162 { 2162 {
2163 Vprocess_list = delq_no_quit (process, Vprocess_list); 2163 Vprocess_list = delq_no_quit (process, Vprocess_list);
2164 Fset_marker (XPROCESS (process)->mark, Qnil, Qnil);
2165 2164
2166 deactivate_process (process); 2165 deactivate_process (process);
2167 } 2166 }
2168 2167
2169 DEFUN ("delete-process", Fdelete_process, 1, 1, 0, /* 2168 DEFUN ("delete-process", Fdelete_process, 1, 1, 0, /*
2650 Vdefault_network_coding_system = Fcons (Qundecided, Qnil); 2649 Vdefault_network_coding_system = Fcons (Qundecided, Qnil);
2651 2650
2652 #ifdef PROCESS_IO_BLOCKING 2651 #ifdef PROCESS_IO_BLOCKING
2653 DEFVAR_LISP ("network-stream-blocking-port-list", &network_stream_blocking_port_list /* 2652 DEFVAR_LISP ("network-stream-blocking-port-list", &network_stream_blocking_port_list /*
2654 List of port numbers or port names to set a blocking I/O mode with connection. 2653 List of port numbers or port names to set a blocking I/O mode with connection.
2655 Nil value means to set a default(non-blocking) I/O mode. 2654 Nil value means to set a default (non-blocking) I/O mode.
2656 The value takes effect when `open-network-stream-internal' is called. 2655 The value takes effect when `open-network-stream-internal' is called.
2657 */ ); 2656 */ );
2658 network_stream_blocking_port_list = Qnil; 2657 network_stream_blocking_port_list = Qnil;
2659 #endif /* PROCESS_IO_BLOCKING */ 2658 #endif /* PROCESS_IO_BLOCKING */
2660 2659