Mercurial > hg > xemacs-beta

comparison src/event-tty.c @ 263:727739f917cb r20-5b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b30
author cvs
date Mon, 13 Aug 2007 10:24:41 +0200
parents 3d6bfa290dbd
children c5d627a313b1
comparison
equal deleted inserted replaced
262:9d8607af9e13 263:727739f917cb
156 { 156 {
157 if (FD_ISSET (i, &temp_mask) && FD_ISSET (i, &process_only_mask)) 157 if (FD_ISSET (i, &temp_mask) && FD_ISSET (i, &process_only_mask))
158 { 158 {
159 Lisp_Object process; 159 Lisp_Object process;
160 struct Lisp_Process *p = 160 struct Lisp_Process *p =
161 get_process_from_input_descriptor (i); 161 get_process_from_usid (FD_TO_USID(i));
162 162
163 assert (p); 163 assert (p);
164 XSETPROCESS (process, p); 164 XSETPROCESS (process, p);
165 emacs_event->event_type = process_event; 165 emacs_event->event_type = process_event;
166 /* process events have nil as channel */ 166 /* process events have nil as channel */
224 { 224 {
225 /* Nothing to do currently because QUIT is handled through SIGINT. 225 /* Nothing to do currently because QUIT is handled through SIGINT.
226 This could change. */ 226 This could change. */
227 } 227 }
228 228
229 static USID
230 emacs_tty_create_stream_pair (void* inhandle, void* outhandle,
231 Lisp_Object* instream, Lisp_Object* outstream, int flags)
232 {
233 return event_stream_unixoid_create_stream_pair
234 (inhandle, outhandle, instream, outstream, flags);
235 }
236
237 static USID
238 emacs_tty_delete_stream_pair (Lisp_Object instream, Lisp_Object outstream)
239 {
240 return event_stream_unixoid_delete_stream_pair (instream, outstream);
241 }
242
229 243
230 /************************************************************************/ 244 /************************************************************************/
231 /* initialization */ 245 /* initialization */
232 /************************************************************************/ 246 /************************************************************************/
233 247
244 tty_event_stream->select_console_cb = emacs_tty_select_console; 258 tty_event_stream->select_console_cb = emacs_tty_select_console;
245 tty_event_stream->unselect_console_cb = emacs_tty_unselect_console; 259 tty_event_stream->unselect_console_cb = emacs_tty_unselect_console;
246 tty_event_stream->select_process_cb = emacs_tty_select_process; 260 tty_event_stream->select_process_cb = emacs_tty_select_process;
247 tty_event_stream->unselect_process_cb = emacs_tty_unselect_process; 261 tty_event_stream->unselect_process_cb = emacs_tty_unselect_process;
248 tty_event_stream->quit_p_cb = emacs_tty_quit_p; 262 tty_event_stream->quit_p_cb = emacs_tty_quit_p;
263 tty_event_stream->create_stream_pair_cb = emacs_tty_create_stream_pair;
264 tty_event_stream->delete_stream_pair_cb = emacs_tty_delete_stream_pair;
249 } 265 }
250 266
251 void 267 void
252 init_event_tty_late (void) 268 init_event_tty_late (void)
253 { 269 {