From: Richard M. Stallman Date: Mon, 28 Apr 1997 00:49:41 +0000 (+0000) Subject: (skip_chars): Fix previous change in syntax/backward case. X-Git-Tag: emacs-20.1~2360 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4c8535eb4d164e4573a1a3bf1108e0c063d73e01;p=emacs.git (skip_chars): Fix previous change in syntax/backward case. --- diff --git a/src/syntax.c b/src/syntax.c index 9ead7e64346..f396b24e087 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -1285,21 +1285,25 @@ skip_chars (forwardp, syntaxp, string, lim) { int savepos = pos; DEC_POS (pos); + UPDATE_SYNTAX_TABLE_BACKWARD (pos); if (!fastmap[(int) SYNTAX (FETCH_CHAR (pos))]) { pos = savepos; break; } - UPDATE_SYNTAX_TABLE_BACKWARD (pos - 1); } } else { - while (pos > XINT (lim) - && fastmap[(int) SYNTAX (FETCH_BYTE (pos - 1))]) + while (pos > XINT (lim)) { pos--; - UPDATE_SYNTAX_TABLE_BACKWARD (pos - 1); + UPDATE_SYNTAX_TABLE_BACKWARD (pos); + if (!fastmap[(int) SYNTAX (FETCH_BYTE (pos))]) + { + pos++; + break; + } } } }