Mercurial > emacs
changeset 47872:e5d59debb925
(scan_lists): Don't get fooled by a symbol ending with a backslash-quoted char.
(scan_lists, scan_sexps_forward): Pacify the compiler.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 14 Oct 2002 04:43:22 +0000 |
parents | f0d9067a78fd |
children | 23880aaee06f |
files | src/syntax.c |
diffstat | 1 files changed, 15 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/syntax.c Mon Oct 14 01:38:07 2002 +0000 +++ b/src/syntax.c Mon Oct 14 04:43:22 2002 +0000 @@ -2164,6 +2164,9 @@ INC_BOTH (from, from_byte); if (!depth && sexpflag) goto done; break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ + break; } } @@ -2211,7 +2214,10 @@ 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 @@ DEC_BOTH (from, from_byte); if (!depth && sexpflag) goto done2; break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ + break; } } @@ -2675,6 +2684,7 @@ 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 @@ break; case Smath: + /* FIXME: We should do something with it. */ + break; + default: + /* Ignore whitespace, punctuation, quote, endcomment. */ break; } }