Mercurial > hg > xemacs-beta
comparison src/process.h @ 272:c5d627a313b1 r21-0b34
Import from CVS: tag r21-0b34
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:28:48 +0200 |
parents | 727739f917cb |
children | ca9a9ec9c1c1 |
comparison
equal
deleted
inserted
replaced
271:c7b7086b0a39 | 272:c5d627a313b1 |
---|---|
31 #define Fget_process(x) Qnil | 31 #define Fget_process(x) Qnil |
32 #define Fget_buffer_process(x) Qnil | 32 #define Fget_buffer_process(x) Qnil |
33 #define kill_buffer_processes(x) 0 | 33 #define kill_buffer_processes(x) 0 |
34 #define close_process_descs() 0 | 34 #define close_process_descs() 0 |
35 #define init_xemacs_process() 0 | 35 #define init_xemacs_process() 0 |
36 extern void wait_without_blocking (void); | 36 void wait_without_blocking (void); |
37 | 37 |
38 #else /* not NO_SUBPROCESSES */ | 38 #else /* not NO_SUBPROCESSES */ |
39 | 39 |
40 /* Only process.c needs to know about the guts of this */ | 40 /* Only process.c needs to know about the guts of this */ |
41 struct Lisp_Process; | 41 struct Lisp_Process; |
48 #define CHECK_PROCESS(x) CHECK_RECORD (x, process) | 48 #define CHECK_PROCESS(x) CHECK_RECORD (x, process) |
49 #define PROCESS_LIVE_P(x) (!NILP (XPROCESS(x)->pipe_instream)) | 49 #define PROCESS_LIVE_P(x) (!NILP (XPROCESS(x)->pipe_instream)) |
50 | 50 |
51 #ifdef emacs | 51 #ifdef emacs |
52 | 52 |
53 Lisp_Object Fget_process (Lisp_Object name); | 53 EXFUN (Fprocess_kill_without_query, 2); |
54 Lisp_Object Fget_buffer_process (Lisp_Object name); | |
55 Lisp_Object Fprocessp (Lisp_Object object); | |
56 Lisp_Object Fprocess_status (Lisp_Object process); | |
57 Lisp_Object Fkill_process (Lisp_Object process, | |
58 Lisp_Object current_group); | |
59 Lisp_Object Fdelete_process (Lisp_Object process); | |
60 Lisp_Object Fopen_network_stream_internal (Lisp_Object name, | |
61 Lisp_Object buffer, | |
62 Lisp_Object host, | |
63 Lisp_Object service, | |
64 Lisp_Object family); | |
65 Lisp_Object Fopen_multicast_group_internal (Lisp_Object name, | |
66 Lisp_Object buffer, | |
67 Lisp_Object dest, | |
68 Lisp_Object port, | |
69 Lisp_Object ttl); | |
70 Lisp_Object Fprocess_kill_without_query (Lisp_Object, Lisp_Object); | |
71 | 54 |
72 Lisp_Object connect_to_file_descriptor (Lisp_Object name, | 55 Lisp_Object connect_to_file_descriptor (Lisp_Object name, |
73 Lisp_Object buffer, | 56 Lisp_Object buffer, |
74 Lisp_Object infd, | 57 Lisp_Object infd, |
75 Lisp_Object outfd); | 58 Lisp_Object outfd); |
107 int network_connection_p (Lisp_Object process); | 90 int network_connection_p (Lisp_Object process); |
108 #else | 91 #else |
109 #define network_connection_p(x) 0 | 92 #define network_connection_p(x) 0 |
110 #endif | 93 #endif |
111 | 94 |
112 extern Lisp_Object Qrun, Qexit, Qopen, Qclosed; | 95 extern Lisp_Object Qclosed, Qmulticast, Qopen, Qrun, Qstop, Qtcpip; |
96 extern Lisp_Object Vprocess_connection_type, Vprocess_list; | |
113 | 97 |
114 /* Report all recent events of a change in process status | 98 /* Report all recent events of a change in process status |
115 (either run the sentinel or output a message). | 99 (either run the sentinel or output a message). |
116 This is done while Emacs is waiting for keyboard input. */ | 100 This is done while Emacs is waiting for keyboard input. */ |
117 void status_notify (void); | 101 void status_notify (void); |