aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAndreas Schwab1998-04-14 13:00:27 +0000
committerAndreas Schwab1998-04-14 13:00:27 +0000
commitd5d6f7060f32746c5b6b5d87c9a6bc7205bfa89d (patch)
treec488ff7fdab5a1b18ec9f047b168e15159df6c99 /src
parentd4d76014dc0aedaa6d2c3fe1fee41fa54f5cde58 (diff)
downloademacs-d5d6f7060f32746c5b6b5d87c9a6bc7205bfa89d.tar.gz
emacs-d5d6f7060f32746c5b6b5d87c9a6bc7205bfa89d.zip
(indented_beyond_p): Fix mixing of Lisp_Object and int.
Diffstat (limited to 'src')
-rw-r--r--src/indent.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/indent.c b/src/indent.c
index 33313a41c78..4d4f4b4b0ca 100644
--- a/src/indent.c
+++ b/src/indent.c
@@ -792,14 +792,14 @@ int
792indented_beyond_p (pos, pos_byte, column) 792indented_beyond_p (pos, pos_byte, column)
793 int pos, pos_byte, column; 793 int pos, pos_byte, column;
794{ 794{
795 Lisp_Object val; 795 int val;
796 int opoint = PT, opoint_byte = PT_BYTE; 796 int opoint = PT, opoint_byte = PT_BYTE;
797 797
798 SET_PT_BOTH (pos, pos_byte); 798 SET_PT_BOTH (pos, pos_byte);
799 while (PT > BEGV && FETCH_BYTE (PT_BYTE) == '\n') 799 while (PT > BEGV && FETCH_BYTE (PT_BYTE) == '\n')
800 scan_newline (PT - 1, PT_BYTE - 1, BEGV, BEGV_BYTE, -1, 0); 800 scan_newline (PT - 1, PT_BYTE - 1, BEGV, BEGV_BYTE, -1, 0);
801 801
802 XSETFASTINT (val, position_indentation (PT_BYTE)); 802 val = position_indentation (PT_BYTE);
803 SET_PT_BOTH (opoint, opoint_byte); 803 SET_PT_BOTH (opoint, opoint_byte);
804 return val; 804 return val;
805} 805}