comparison src/window.c @ 6341:dfc758dd2b08

(window_scroll, Fmove_to_window_line): Avoid dividing negative numbers, since the rounding effect is implementation-defined.

6340:e9c46ef0a877

  XFASTINT (tem) = point;
  tem = Fpos_visible_in_window_p (tem, window);

  if (NILP (tem))
    {
      Fvertical_motion (make_number (- ht / 2), window);
      XFASTINT (tem) = point;
      Fset_marker (w->start, tem, w->buffer);
      w->force_start = Qt;
    }

  start = marker_position (w->start);
  XSET (window, Lisp_Window, w);
  if (start < BEGV || start > ZV)
    {
      Fvertical_motion (make_number (- height / 2), window);
      Fset_marker (w->start, make_number (point), w->buffer);
      w->start_at_line_beg = Fbolp ();
      w->force_start = Qt;
    }
  else

6341:dfc758dd2b08

  XFASTINT (tem) = point;
  tem = Fpos_visible_in_window_p (tem, window);

  if (NILP (tem))
    {
      Fvertical_motion (make_number (- (ht / 2)), window);
      XFASTINT (tem) = point;
      Fset_marker (w->start, tem, w->buffer);
      w->force_start = Qt;
    }

  start = marker_position (w->start);
  XSET (window, Lisp_Window, w);
  if (start < BEGV || start > ZV)
    {
      Fvertical_motion (make_number (- (height / 2)), window);
      Fset_marker (w->start, make_number (point), w->buffer);
      w->start_at_line_beg = Fbolp ();
      w->force_start = Qt;
    }
  else