diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-10-14 04:44:24 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-10-14 04:44:24 +0000 |
commit | 240c43e89c8fa9b08a4c2718acfc8d4df7b97fbf (patch) | |
tree | 1360b73de143907d6b50c971a5628dd9880e9044 /src/syntax.c | |
parent | b3e16b714c808d01146407140685c832fbf45d81 (diff) | |
download | emacs-240c43e89c8fa9b08a4c2718acfc8d4df7b97fbf.tar.gz |
(scan_lists): Don't get fooled by a symbol ending with a backslash-quoted char.
(scan_lists, scan_sexps_forward): Pacify the compiler.
Diffstat (limited to 'src/syntax.c')
-rw-r--r-- | src/syntax.c | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/src/syntax.c b/src/syntax.c index f020bdbbced..0f2cda592aa 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -2164,6 +2164,9 @@ scan_lists (from, count, depth, sexpflag) INC_BOTH (from, from_byte); if (!depth && sexpflag) goto done; break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ + break; } } @@ -2211,7 +2214,10 @@ scan_lists (from, count, depth, sexpflag) into a word character. Note that this cannot be true if we decremented FROM in the if-statement above. */ if (code != Sendcomment && char_quoted (from, from_byte)) - code = Sword; + { + DEC_BOTH (from, from_byte); + code = Sword; + } else if (SYNTAX_PREFIX (c)) continue; @@ -2332,6 +2338,9 @@ scan_lists (from, count, depth, sexpflag) DEC_BOTH (from, from_byte); if (!depth && sexpflag) goto done2; break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ + break; } } @@ -2675,6 +2684,7 @@ do { prev_from = from; \ curlevel->prev = curlevel->last; break; + case Scomment_fence: /* Can't happen because it's handled above. */ case Scomment: if (commentstop || boundary_stop) goto done; startincomment: @@ -2770,6 +2780,10 @@ do { prev_from = from; \ break; case Smath: + /* FIXME: We should do something with it. */ + break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ break; } } |