diff options
| author | Andreas Schwab | 1998-04-14 13:00:27 +0000 |
|---|---|---|
| committer | Andreas Schwab | 1998-04-14 13:00:27 +0000 |
| commit | d5d6f7060f32746c5b6b5d87c9a6bc7205bfa89d (patch) | |
| tree | c488ff7fdab5a1b18ec9f047b168e15159df6c99 /src | |
| parent | d4d76014dc0aedaa6d2c3fe1fee41fa54f5cde58 (diff) | |
| download | emacs-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.c | 4 |
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 | |||
| 792 | indented_beyond_p (pos, pos_byte, column) | 792 | indented_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 | } |