martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Change FETCH_CHAR references to FETCH_BYTE.

Browse Source
This commit is contained in:
Karl Heuer
1997-02-22 19:26:15 +00:00
parent f8bce5df30
commit fc44dfab72
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/abbrev.c
View File

@@ -243,7 +243,7 @@ Returns the abbrev symbol, if expansion took place.")
Vabbrev_start_location = Qnil;
if (wordstart < BEGV || wordstart > ZV)
wordstart = 0;
if (wordstart && wordstart != ZV && FETCH_CHAR (wordstart) == '-')
if (wordstart && wordstart != ZV && FETCH_BYTE (wordstart) == '-')
del_range (wordstart, wordstart + 1);
}
if (!wordstart)
@@ -266,7 +266,7 @@ Returns the abbrev symbol, if expansion took place.")
for (idx = wordstart; idx < wordend; idx++)
{
register int c = FETCH_CHAR (idx);
register int c = FETCH_BYTE (idx);
if (UPPERCASEP (c))
c = DOWNCASE (c), uccount++;
else if (! NOCASEP (c))

4
src/casefiddle.c
View File

@@ -149,13 +149,13 @@ casify_region (flag, b, e)
for (i = start; i < end; i++)
{
c = FETCH_CHAR (i);
c = FETCH_BYTE (i);
if (inword && flag != CASE_CAPITALIZE_UP)
c = DOWNCASE (c);
else if (!UPPERCASEP (c)
&& (!inword || flag != CASE_CAPITALIZE_UP))
c = UPCASE1 (c);
FETCH_CHAR (i) = c;
FETCH_BYTE (i) = c;
if ((int) flag >= (int) CASE_CAPITALIZE)
inword = SYNTAX (c) == Sword;
}