Mercurial > hg > xemacs-beta

comparison src/event-Xt.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 576fb035e263
children 3078fd1074e8
comparison
equal deleted inserted replaced
445:34f3776fcf0e 446:1ccc32a20af4
1348 unsigned long size, dtype; 1348 unsigned long size, dtype;
1349 Lisp_Object l_type = Qnil, l_data = Qnil; 1349 Lisp_Object l_type = Qnil, l_data = Qnil;
1350 Lisp_Object l_dndlist = Qnil, l_item = Qnil; 1350 Lisp_Object l_dndlist = Qnil, l_item = Qnil;
1351 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4; 1351 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
1352 1352
1353 GCPRO4 (l_type, l_data, l_dndlist, l_item);
1354
1355 if (! frame) 1353 if (! frame)
1356 return 0; /* not for us */ 1354 return 0; /* not for us */
1355
1356 GCPRO4 (l_type, l_data, l_dndlist, l_item);
1357 XSETFRAME (emacs_event->channel, frame); 1357 XSETFRAME (emacs_event->channel, frame);
1358 1358
1359 emacs_event->event_type = misc_user_event; 1359 emacs_event->event_type = misc_user_event;
1360 emacs_event->timestamp = DEVICE_X_LAST_SERVER_TIMESTAMP (d); 1360 emacs_event->timestamp = DEVICE_X_LAST_SERVER_TIMESTAMP (d);
1361 1361