comparison src/xterm.c @ 8098:e44c31d682b1

(x_draw_box): Use curs_x and curs_y, not f->cursor_[xy]. (x_make_frame_visible): In x_sync loop at the end, every fourth time, sleep for 1/4 second.

8097:f18272ebe3e6

static void
x_draw_box (f)
     struct frame *f;
{
  int left = CHAR_TO_PIXEL_COL (f, f->cursor_x);
  int top  = CHAR_TO_PIXEL_ROW (f, f->cursor_y);
  int width = FONT_WIDTH (f->display.x->font);
  int height = f->display.x->line_height;

#ifdef HAVE_X11
  XDrawRectangle (x_current_display, FRAME_X_WINDOW (f),

  /* Synchronize to ensure Emacs knows the frame is visible
     before we do anything else.  We do this loop with input not blocked
     so that incoming events are handled.  */
  {
    Lisp_Object frame;
    XSET (frame, Lisp_Frame, f);
    while (! f->async_visible)
      x_sync (frame);
    FRAME_SAMPLE_VISIBILITY (f);
  }
}

/* Change from mapped state to withdrawn state. */

8098:e44c31d682b1

static void
x_draw_box (f)
     struct frame *f;
{
  int left = CHAR_TO_PIXEL_COL (f, curs_x);
  int top  = CHAR_TO_PIXEL_ROW (f, curs_y);
  int width = FONT_WIDTH (f->display.x->font);
  int height = f->display.x->line_height;

#ifdef HAVE_X11
  XDrawRectangle (x_current_display, FRAME_X_WINDOW (f),

  /* Synchronize to ensure Emacs knows the frame is visible
     before we do anything else.  We do this loop with input not blocked
     so that incoming events are handled.  */
  {
    Lisp_Object frame;
    int one_in_four = 0;
    XSET (frame, Lisp_Frame, f);
    while (! f->async_visible)
      {
	x_sync (frame);
	/* On HPUX on the HP800, the sleep is needed sometimes.  */
	if ((one_in_four & 3) == 0)
	  {
#ifdef EMACS_HAS_USECS
	    Fsleep_for (make_number (1), make_number (0));
#else
	    Fsleep_for (make_number (0), make_number (250));
#endif
	  }
	one_in_four++;
      }
    FRAME_SAMPLE_VISIBILITY (f);
  }
}

/* Change from mapped state to withdrawn state. */