Mercurial > hg > xemacs-beta

comparison src/gpmevent.c @ 446:1ccc32a20af4 r21-2-38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-38
author cvs
date Mon, 13 Aug 2007 11:37:21 +0200
parents abe6d1db359e
children 3d3049ae1304
comparison
equal deleted inserted replaced
445:34f3776fcf0e 446:1ccc32a20af4
110 (process, string)) 110 (process, string))
111 { 111 {
112 Gpm_Event ev; 112 Gpm_Event ev;
113 int modifiers = 0; 113 int modifiers = 0;
114 int button = 1; 114 int button = 1;
115 Lisp_Object fake_event; 115 Lisp_Object fake_event = Qnil;
116 Lisp_Event *event = NULL; 116 Lisp_Event *event = NULL;
117 struct gcpro gcpro1; 117 struct gcpro gcpro1;
118 static int num_events; 118 static int num_events;
119 119
120 CHECK_PROCESS (process); 120 CHECK_PROCESS (process);
215 { 215 {
216 /* This function can GC */ 216 /* This function can GC */
217 struct device *d = decode_device (Qnil); 217 struct device *d = decode_device (Qnil);
218 int fd = DEVICE_INFD (d); 218 int fd = DEVICE_INFD (d);
219 char c = 3; 219 char c = 3;
220 Lisp_Object output_stream; 220 Lisp_Object output_stream = Qnil;
221 Lisp_Object terminal_stream; 221 Lisp_Object terminal_stream = Qnil ;
222 Lisp_Object output_string; 222 Lisp_Object output_string = Qnil;
223 struct gcpro gcpro1,gcpro2,gcpro3; 223 struct gcpro gcpro1,gcpro2,gcpro3;
224 224
225 GCPRO3(output_stream,terminal_stream,output_string); 225 GCPRO3(output_stream,terminal_stream,output_string);
226 226
227 /* The ioctl() to paste actually puts things in the input queue of 227 /* The ioctl() to paste actually puts things in the input queue of