changeset 17880:06f58d8a59ba

(Ffind_charset_region): Change the declaration of charsets from `char' to `int. (find_charset_in_str): Likewize.
author Kenichi Handa <handa@m17n.org>
date Mon, 19 May 1997 03:33:50 +0000
parents e7f0ba5c198c
children a0db136e6595
files src/charset.c
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/charset.c	Mon May 19 03:33:50 1997 +0000
+++ b/src/charset.c	Mon May 19 03:33:50 1997 +0000
@@ -539,8 +539,8 @@
 
 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 @@
   (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 @@
   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);