changeset 17371:97283cd93432

(construct_menu_click, note_mouse_highlight, fast_find_position): Fix Lisp_Object/integer confusion.
author Karl Heuer <kwzh@gnu.org>
date Thu, 10 Apr 1997 22:25:45 +0000
parents 6db43d8c9dfc
children 30720c688961
files src/xterm.c
diffstat 1 files changed, 6 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/src/xterm.c	Thu Apr 10 22:19:52 1997 +0000
+++ b/src/xterm.c	Thu Apr 10 22:25:45 1997 +0000
@@ -2205,7 +2205,7 @@
   /* Make the event type no_event; we'll change that when we decide
      otherwise.  */
   result->kind = mouse_click;
-  XSETINT (result->code, event->button - Button1);
+  result->code = event->button - Button1;
   result->timestamp = event->time;
   result->modifiers = (x_x_to_emacs_modifiers (FRAME_X_DISPLAY_INFO (f),
 					       event->state)
@@ -2305,8 +2305,9 @@
   if (WINDOWP (window) && portion == 0 && row >= 0 && column >= 0
       && row < FRAME_HEIGHT (f) && column < FRAME_WIDTH (f)
       && EQ (w->window_end_valid, w->buffer)
-      && w->last_modified == BUF_MODIFF (XBUFFER (w->buffer))
-      && w->last_overlay_modified == BUF_OVERLAY_MODIFF (XBUFFER (w->buffer)))
+      && XFASTINT (w->last_modified) == BUF_MODIFF (XBUFFER (w->buffer))
+      && (XFASTINT (w->last_overlay_modified)
+	  == BUF_OVERLAY_MODIFF (XBUFFER (w->buffer))))
     {
       int *ptr = FRAME_CURRENT_GLYPHS (f)->charstarts[row];
       int i, pos;
@@ -2358,7 +2359,7 @@
 
 	  /* Put all the overlays we want in a vector in overlay_vec.
 	     Store the length in len.  */
-	  noverlays = overlays_at (XINT (pos), 1, &overlay_vec, &len,
+	  noverlays = overlays_at (pos, 1, &overlay_vec, &len,
 				   NULL, NULL);
 	  noverlays = sort_overlays (overlay_vec, noverlays, w);
 
@@ -2465,7 +2466,7 @@
   int i;
   int row = 0;
   int left = WINDOW_LEFT_MARGIN (w);
-  int top = w->top;
+  int top = XFASTINT (w->top);
   int height = XFASTINT (w->height) - ! MINI_WINDOW_P (w);
   int width = window_internal_width (w);
   int *charstarts;