Mercurial > emacs
changeset 18003:ac148c939dec
(Ffind_charset_string): The variable CHARSETS is
changed to (int *).
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 28 May 1997 04:36:32 +0000 |
parents | a14261786239 |
children | 40ce43a92060 |
files | src/charset.c |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/charset.c Wed May 28 04:36:27 1997 +0000 +++ b/src/charset.c Wed May 28 04:36:32 1997 +0000 @@ -534,7 +534,7 @@ /* Return number of different charsets in STR of length LEN. In addition, for each found charset N, CHARSETS[N] is set 1. The - caller should allocate CHARSETS (MAX_CHARSET + 1 bytes) in advance. + caller should allocate CHARSETS (MAX_CHARSET + 1 elements) in advance. It may lookup a unification table TABLE if supplied. */ int @@ -616,12 +616,12 @@ (str, table) Lisp_Object str, table; { - char charsets[MAX_CHARSET + 1]; + int charsets[MAX_CHARSET + 1]; int i; Lisp_Object val; CHECK_STRING (str, 0); - bzero (charsets, MAX_CHARSET + 1); + bzero (charsets, (MAX_CHARSET + 1) * sizeof (int)); find_charset_in_str (XSTRING (str)->data, XSTRING (str)->size, charsets, table); val = Qnil;