aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKarl Heuer1994-03-30 03:02:02 +0000
committerKarl Heuer1994-03-30 03:02:02 +0000
commitfaa5c515a3ccc4bfcb842654ab2c5ec82ea33f17 (patch)
tree07334731ea6089c501bd6700ea8c53b0aaaa8343 /src
parent4fb767875885b15dc06f9be4306d1f955f450e63 (diff)
downloademacs-faa5c515a3ccc4bfcb842654ab2c5ec82ea33f17.tar.gz
emacs-faa5c515a3ccc4bfcb842654ab2c5ec82ea33f17.zip
(Fcompute_motion): Don't use XFASTINT on possibly-negative coords.
Also another doc fix.
Diffstat (limited to 'src')
-rw-r--r--src/indent.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/indent.c b/src/indent.c
index 10d4a594f42..7a8995b9392 100644
--- a/src/indent.c
+++ b/src/indent.c
@@ -631,7 +631,7 @@ being displayed, perhaps because the line was continued within it.\n\
631If OFFSETS is nil, HSCROLL and TAB-OFFSET are assumed to be zero.\n\ 631If OFFSETS is nil, HSCROLL and TAB-OFFSET are assumed to be zero.\n\
632\n\ 632\n\
633The value is a list of five elements:\n\ 633The value is a list of five elements:\n\
634 (POS VPOS HPOS PREVHPOS CONTIN)\n\ 634 (POS HPOS VPOS PREVHPOS CONTIN)\n\
635POS is the buffer position where the scan stopped.\n\ 635POS is the buffer position where the scan stopped.\n\
636VPOS is the vertical position where the scan stopped.\n\ 636VPOS is the vertical position where the scan stopped.\n\
637HPOS is the horizontal position where the scan stopped.\n\ 637HPOS is the horizontal position where the scan stopped.\n\
@@ -679,9 +679,9 @@ visible section of the buffer, and pass LINE and COL as TOPOS.")
679 XINT (width), hscroll, tab_offset); 679 XINT (width), hscroll, tab_offset);
680 680
681 XFASTINT (bufpos) = pos->bufpos; 681 XFASTINT (bufpos) = pos->bufpos;
682 XFASTINT (hpos) = pos->hpos; 682 XSET (hpos, Lisp_Int, pos->hpos);
683 XSET (vpos, Lisp_Int, pos->vpos); 683 XSET (vpos, Lisp_Int, pos->vpos);
684 XFASTINT (prevhpos) = pos->prevhpos; 684 XSET (prevhpos, Lisp_Int, pos->prevhpos);
685 685
686 return Fcons (bufpos, 686 return Fcons (bufpos,
687 Fcons (hpos, 687 Fcons (hpos,