diff options
| author | Karl Heuer | 1994-03-14 21:36:17 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-03-14 21:36:17 +0000 |
| commit | cd2be1ddb82fbfc4a0e7f4c47ae972ed61b1bf22 (patch) | |
| tree | e3b5b86b6d547f357040192fc976cf0f2e0cc47d | |
| parent | af2820894be368e6b75e339012805e8cd9054201 (diff) | |
| download | emacs-cd2be1ddb82fbfc4a0e7f4c47ae972ed61b1bf22.tar.gz emacs-cd2be1ddb82fbfc4a0e7f4c47ae972ed61b1bf22.zip | |
(window_scroll, Fmove_to_window_line): Avoid dividing negative numbers,
since the rounding effect is implementation-defined.
| -rw-r--r-- | src/window.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/window.c b/src/window.c index 78a85300b98..0f827113b65 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -2178,7 +2178,7 @@ window_scroll (window, n, noerror) | |||
| 2178 | 2178 | ||
| 2179 | if (NILP (tem)) | 2179 | if (NILP (tem)) |
| 2180 | { | 2180 | { |
| 2181 | Fvertical_motion (make_number (- ht / 2), window); | 2181 | Fvertical_motion (make_number (- (ht / 2)), window); |
| 2182 | XFASTINT (tem) = point; | 2182 | XFASTINT (tem) = point; |
| 2183 | Fset_marker (w->start, tem, w->buffer); | 2183 | Fset_marker (w->start, tem, w->buffer); |
| 2184 | w->force_start = Qt; | 2184 | w->force_start = Qt; |
| @@ -2467,7 +2467,7 @@ negative means relative to bottom of window.") | |||
| 2467 | XSET (window, Lisp_Window, w); | 2467 | XSET (window, Lisp_Window, w); |
| 2468 | if (start < BEGV || start > ZV) | 2468 | if (start < BEGV || start > ZV) |
| 2469 | { | 2469 | { |
| 2470 | Fvertical_motion (make_number (- height / 2), window); | 2470 | Fvertical_motion (make_number (- (height / 2)), window); |
| 2471 | Fset_marker (w->start, make_number (point), w->buffer); | 2471 | Fset_marker (w->start, make_number (point), w->buffer); |
| 2472 | w->start_at_line_beg = Fbolp (); | 2472 | w->start_at_line_beg = Fbolp (); |
| 2473 | w->force_start = Qt; | 2473 | w->force_start = Qt; |