diff options
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/syntax.c b/src/syntax.c index 78c7de9c65b..f8d987b377c 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -1633,7 +1633,7 @@ skip_chars (bool forwardp, Lisp_Object string, Lisp_Object lim, | |||
| 1633 | int c; | 1633 | int c; |
| 1634 | char fastmap[0400]; | 1634 | char fastmap[0400]; |
| 1635 | /* Store the ranges of non-ASCII characters. */ | 1635 | /* Store the ranges of non-ASCII characters. */ |
| 1636 | int *char_ranges IF_LINT (= NULL); | 1636 | int *char_ranges UNINIT; |
| 1637 | int n_char_ranges = 0; | 1637 | int n_char_ranges = 0; |
| 1638 | bool negate = 0; | 1638 | bool negate = 0; |
| 1639 | ptrdiff_t i, i_byte; | 1639 | ptrdiff_t i, i_byte; |
| @@ -3128,8 +3128,9 @@ the prefix syntax flag (p). */) | |||
| 3128 | opoint = pos; | 3128 | opoint = pos; |
| 3129 | opoint_byte = pos_byte; | 3129 | opoint_byte = pos_byte; |
| 3130 | 3130 | ||
| 3131 | if (pos + 1 > beg) | 3131 | if (pos <= beg) |
| 3132 | DEC_BOTH (pos, pos_byte); | 3132 | break; |
| 3133 | DEC_BOTH (pos, pos_byte); | ||
| 3133 | } | 3134 | } |
| 3134 | 3135 | ||
| 3135 | SET_PT_BOTH (opoint, opoint_byte); | 3136 | SET_PT_BOTH (opoint, opoint_byte); |
| @@ -3771,7 +3772,7 @@ In both cases, LIMIT bounds the search. */); | |||
| 3771 | Vfind_word_boundary_function_table = Fmake_char_table (Qnil, Qnil); | 3772 | Vfind_word_boundary_function_table = Fmake_char_table (Qnil, Qnil); |
| 3772 | 3773 | ||
| 3773 | DEFVAR_BOOL ("comment-end-can-be-escaped", Vcomment_end_can_be_escaped, | 3774 | DEFVAR_BOOL ("comment-end-can-be-escaped", Vcomment_end_can_be_escaped, |
| 3774 | doc: /* Non-nil means an escaped ender inside a comment doesn'tend the comment. */); | 3775 | doc: /* Non-nil means an escaped ender inside a comment doesn't end the comment. */); |
| 3775 | Vcomment_end_can_be_escaped = 0; | 3776 | Vcomment_end_can_be_escaped = 0; |
| 3776 | DEFSYM (Qcomment_end_can_be_escaped, "comment-end-can-be-escaped"); | 3777 | DEFSYM (Qcomment_end_can_be_escaped, "comment-end-can-be-escaped"); |
| 3777 | Fmake_variable_buffer_local (Qcomment_end_can_be_escaped); | 3778 | Fmake_variable_buffer_local (Qcomment_end_can_be_escaped); |