Mercurial > hg > xemacs-beta

comparison src/process.c @ 282:c42ec1d1cded r21-0b39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b39
author cvs
date Mon, 13 Aug 2007 10:33:18 +0200
parents 7df0dd720c89
children e11d67e05968
comparison
equal deleted inserted replaced
281:090b52736db2 282:c42ec1d1cded
713 proc = make_process_internal (name); 713 proc = make_process_internal (name);
714 NGCPRO1 (proc); 714 NGCPRO1 (proc);
715 715
716 XPROCESS (proc)->pid = Fcons (service, host); 716 XPROCESS (proc)->pid = Fcons (service, host);
717 XPROCESS (proc)->buffer = buffer; 717 XPROCESS (proc)->buffer = buffer;
718 init_process_io_handles (XPROCESS (proc), (void*)inch, (void*)outch, 0); 718 init_process_io_handles (XPROCESS (proc), (void*)inch, (void*)outch,
719 STREAM_NETWORK_CONNECTION);
719 720
720 event_stream_select_process (XPROCESS (proc)); 721 event_stream_select_process (XPROCESS (proc));
721 722
722 UNGCPRO; 723 UNGCPRO;
723 NUNGCPRO; 724 NUNGCPRO;
763 proc = make_process_internal (name); 764 proc = make_process_internal (name);
764 GCPRO1 (proc); 765 GCPRO1 (proc);
765 766
766 XPROCESS (proc)->pid = Fcons (port, dest); 767 XPROCESS (proc)->pid = Fcons (port, dest);
767 XPROCESS (proc)->buffer = buffer; 768 XPROCESS (proc)->buffer = buffer;
768 init_process_io_handles (XPROCESS (proc), (void*)inch, (void*)outch, 0); 769 init_process_io_handles (XPROCESS (proc), (void*)inch, (void*)outch,
770 STREAM_NETWORK_CONNECTION);
769 771
770 event_stream_select_process (XPROCESS (proc)); 772 event_stream_select_process (XPROCESS (proc));
771 773
772 UNGCPRO; 774 UNGCPRO;
773 return proc; 775 return proc;