Mercurial > hg > xemacs-beta

comparison src/events.c @ 274:ca9a9ec9c1c1 r21-0b35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b35
author cvs
date Mon, 13 Aug 2007 10:29:42 +0200
parents c5d627a313b1
children 7df0dd720c89
comparison
equal deleted inserted replaced
273:411aac7253ef 274:ca9a9ec9c1c1
185 Lisp_Object Vx, Vy; 185 Lisp_Object Vx, Vy;
186 Vx = Fevent_x_pixel (obj); 186 Vx = Fevent_x_pixel (obj);
187 assert (INTP (Vx)); 187 assert (INTP (Vx));
188 Vy = Fevent_y_pixel (obj); 188 Vy = Fevent_y_pixel (obj);
189 assert (INTP (Vy)); 189 assert (INTP (Vy));
190 sprintf (buf, "#<motion-event %d, %d", XINT (Vx), XINT (Vy)); 190 sprintf (buf, "#<motion-event %ld, %ld", (long)(XINT (Vx)), (long)(XINT (Vy)));
191 write_c_string (buf, printcharfun); 191 write_c_string (buf, printcharfun);
192 break; 192 break;
193 } 193 }
194 case process_event: 194 case process_event:
195 write_c_string ("#<process-event ", printcharfun); 195 write_c_string ("#<process-event ", printcharfun);