procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(skip_chars): Fix previous change in syntax/backward case.

Browse source
This commit is contained in:
Richard M. Stallman 1997-04-28 00:49:41 +00:00
parent 028873a048
commit 4c8535eb4d
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/syntax.c
View file

@ -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;
}
}
}
}