mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-05 11:21:04 -08:00
Code Issues Projects Releases Wiki Activity

(Ffind_charset_region): Change the declaration of

Browse source 
charsets from `char' to `int.
(find_charset_in_str): Likewize.
This commit is contained in:
Kenichi Handa 1997-05-19 03:33:50 +00:00
parent b8344c0e61
commit 028d516b9c
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/charset.c
View file

@ -539,8 +539,8 @@ CHARSET should be defined by `defined-charset' in advance.")
int
find_charset_in_str (str, len, charsets, table)
unsigned char *str, *charsets;
int len;
unsigned char *str;
int len, *charsets;
Lisp_Object table;
{
int num = 0;
@ -584,7 +584,7 @@ Optional arg TABLE if non-nil is a unification table to look up.")
(beg, end, table)
Lisp_Object beg, end, table;
{
char charsets[MAX_CHARSET + 1];
int charsets[MAX_CHARSET + 1];
int from, to, stop, i;
Lisp_Object val;
@ -593,7 +593,7 @@ Optional arg TABLE if non-nil is a unification table to look up.")
stop = to = XFASTINT (end);
if (from < GPT && GPT < to)
stop = GPT;
bzero (charsets, MAX_CHARSET + 1);
bzero (charsets, (MAX_CHARSET + 1) * sizeof (int));
while (1)
{
find_charset_in_str (POS_ADDR (from), stop - from, charsets, table);