diff options
| author | Richard M. Stallman | 1998-06-11 02:33:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-06-11 02:33:06 +0000 |
| commit | 89c6809aa9d96e0f22e8fdd7b421187b5396bbcf (patch) | |
| tree | 1abb28c6ac6268212e06bacf47b2ed90a5ec2b7d /src/syntax.c | |
| parent | 445f44d296f452fda44fa31560fed363297304d2 (diff) | |
| download | emacs-89c6809aa9d96e0f22e8fdd7b421187b5396bbcf.tar.gz emacs-89c6809aa9d96e0f22e8fdd7b421187b5396bbcf.zip | |
(Fforward_comment): Properly compute BYTEPOS arg to char_quoted.
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/syntax.c b/src/syntax.c index b2d14576839..79e278a5093 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -1608,7 +1608,6 @@ between them, return t; otherwise return nil.") | |||
| 1608 | int comstyle = 0; /* style of comment encountered */ | 1608 | int comstyle = 0; /* style of comment encountered */ |
| 1609 | int found; | 1609 | int found; |
| 1610 | int count1; | 1610 | int count1; |
| 1611 | int temp_pos; | ||
| 1612 | int out_charpos, out_bytepos; | 1611 | int out_charpos, out_bytepos; |
| 1613 | 1612 | ||
| 1614 | CHECK_NUMBER (count, 0); | 1613 | CHECK_NUMBER (count, 0); |
| @@ -1734,7 +1733,7 @@ between them, return t; otherwise return nil.") | |||
| 1734 | comstart_second = SYNTAX_COMSTART_SECOND (c); | 1733 | comstart_second = SYNTAX_COMSTART_SECOND (c); |
| 1735 | if (from > stop && SYNTAX_COMEND_SECOND (c) | 1734 | if (from > stop && SYNTAX_COMEND_SECOND (c) |
| 1736 | && prev_char_comend_first (from, from_byte) | 1735 | && prev_char_comend_first (from, from_byte) |
| 1737 | && !char_quoted (from - 1, temp_pos)) | 1736 | && !char_quoted (from - 1, dec_bytepos (from_byte))) |
| 1738 | { | 1737 | { |
| 1739 | /* We must record the comment style encountered so that | 1738 | /* We must record the comment style encountered so that |
| 1740 | later, we can match only the proper comment begin | 1739 | later, we can match only the proper comment begin |
| @@ -1747,7 +1746,7 @@ between them, return t; otherwise return nil.") | |||
| 1747 | } | 1746 | } |
| 1748 | if (from > stop && comstart_second | 1747 | if (from > stop && comstart_second |
| 1749 | && prev_char_comstart_first (from, from_byte) | 1748 | && prev_char_comstart_first (from, from_byte) |
| 1750 | && !char_quoted (from - 1, temp_pos)) | 1749 | && !char_quoted (from - 1, dec_bytepos (from_byte))) |
| 1751 | { | 1750 | { |
| 1752 | /* We must record the comment style encountered so that | 1751 | /* We must record the comment style encountered so that |
| 1753 | later, we can match only the proper comment begin | 1752 | later, we can match only the proper comment begin |