aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1998-06-14 19:04:01 +0000
committerRichard M. Stallman <[email protected]>1998-06-14 19:04:01 +0000
commit1674d9a28b1e4ea7ca6b39ac1e5d74f9ccb15302 (patch)
tree46381e3ba00246915fed0b7c034cf9bf045bdfdf /src
parentcdfac812762e9247e957408625b41332dfcdad30 (diff)
(skip_chars): Don't examine STRING before verifying that it is a string.
(scan_lists): Use prev_char_comend_first, not ...comstart...
Diffstat (limited to 'src')
-rw-r--r--src/syntax.c8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/syntax.c b/src/syntax.c
index 79e278a509..4ab87a3a3c 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -1289,11 +1289,13 @@ skip_chars (forwardp, syntaxp, string, lim)
int negate = 0;
register int i, i_byte;
int multibyte = !NILP (current_buffer->enable_multibyte_characters);
- int string_multibyte = STRING_MULTIBYTE (string);
- int size_byte = STRING_BYTES (XSTRING (string));
+ int string_multibyte;
+ int size_byte;
CHECK_STRING (string, 0);
char_ranges = (int *) alloca (XSTRING (string)->size * (sizeof (int)) * 2);
+ string_multibyte = STRING_MULTIBYTE (string);
+ size_byte = STRING_BYTES (XSTRING (string));
if (NILP (lim))
XSETINT (lim, forwardp ? ZV : BEGV);
@@ -2021,7 +2023,7 @@ scan_lists (from, count, depth, sexpflag)
if (code == Sendcomment)
comstyle = SYNTAX_COMMENT_STYLE (c);
if (from > stop && SYNTAX_COMEND_SECOND (c)
- && prev_char_comstart_first (from, from_byte)
+ && prev_char_comend_first (from, from_byte)
&& parse_sexp_ignore_comments)
{
/* We must record the comment style encountered so that