# HG changeset patch # User Kenichi Handa # Date 858727894 0 # Node ID 6637001cdb4b19accc0f49c48289c323ac2a52f9 # Parent 7c008ec99e97556f62882b37a3e4db6abeb29816 Adjusted for the change of MAX_CHARSET. diff -r 7c008ec99e97 -r 6637001cdb4b src/coding.c --- a/src/coding.c Tue Mar 18 23:31:34 1997 +0000 +++ b/src/coding.c Tue Mar 18 23:31:34 1997 +0000 @@ -2146,7 +2146,7 @@ elements (if integer) is designated to REG on request, if an element is t, REG can be used by any charset, nil: REG is never used. */ - for (charset = 0; charset < MAX_CHARSET; charset++) + for (charset = 0; charset <= MAX_CHARSET; charset++) CODING_SPEC_ISO_REQUESTED_DESIGNATION (coding, charset) = -1; for (i = 0; i < 4; i++) { @@ -2207,7 +2207,7 @@ default_reg_bits &= 3; } - for (charset = 0; charset < MAX_CHARSET; charset++) + for (charset = 0; charset <= MAX_CHARSET; charset++) if (CHARSET_VALID_P (charset) && CODING_SPEC_ISO_REQUESTED_DESIGNATION (coding, charset) < 0) { diff -r 7c008ec99e97 -r 6637001cdb4b src/coding.h --- a/src/coding.h Tue Mar 18 23:31:34 1997 +0000 +++ b/src/coding.h Tue Mar 18 23:31:34 1997 +0000 @@ -149,7 +149,7 @@ int initial_designation[4]; /* A graphic register to which each charset should be designated. */ - char requested_designation[MAX_CHARSET]; + char requested_designation[MAX_CHARSET + 1]; /* Set to 1 temporarily only when graphic register 2 or 3 is invoked by single-shift while encoding. */ diff -r 7c008ec99e97 -r 6637001cdb4b src/fontset.c --- a/src/fontset.c Tue Mar 18 23:31:34 1997 +0000 +++ b/src/fontset.c Tue Mar 18 23:31:34 1997 +0000 @@ -96,7 +96,7 @@ int j; xfree (fontset_data->fontset_table[i]->name); - for (j = 0; j < MAX_CHARSET; j++) + for (j = 0; j <= MAX_CHARSET; j++) if (fontset_data->fontset_table[i]->fontname[j]) xfree (fontset_data->fontset_table[i]->fontname[j]); xfree (fontset_data->fontset_table[i]); @@ -172,7 +172,7 @@ int i; fontp->encoding[0] = fontp->encoding[1]; - for (i = MIN_CHARSET_OFFICIAL_DIMENSION1; i < MAX_CHARSET; i++) + for (i = MIN_CHARSET_OFFICIAL_DIMENSION1; i <= MAX_CHARSET; i++) fontp->encoding[i] = fontp->encoding[1]; } else @@ -182,7 +182,7 @@ /* At first, set 1 (means 0xA0..0xFF) as the default. */ fontp->encoding[0] = 1; - for (i = MIN_CHARSET_OFFICIAL_DIMENSION1; i < MAX_CHARSET; i++) + for (i = MIN_CHARSET_OFFICIAL_DIMENSION1; i <= MAX_CHARSET; i++) fontp->encoding[i] = 1; /* Then override them by a specification in Vfont_encoding_alist. */ for (list = Vfont_encoding_alist; CONSP (list); list = XCONS (list)->cdr) @@ -242,7 +242,7 @@ fontsetp->size = fontp->size; fontsetp->height = fontp->height; - for (i = CHARSET_ASCII + 1; i < MAX_CHARSET; i++) + for (i = CHARSET_ASCII + 1; i <= MAX_CHARSET; i++) { font_idx = fontsetp->font_indexes[i]; if (font_idx >= 0) @@ -317,7 +317,7 @@ fontsetp->size = fontsetp->height = 0; - for (i = 0; i < MAX_CHARSET; i++) + for (i = 0; i <= MAX_CHARSET; i++) { fontsetp->fontname[i] = (char *) 0; fontsetp->font_indexes[i] = FONT_NOT_OPENED; @@ -521,7 +521,7 @@ one with SIZE. */ int j; - for (j = 0; j < MAX_CHARSET; j++) + for (j = 0; j <= MAX_CHARSET; j++) if (fontsetp->fontname[j]) { if ((*load_font_func) (f, fontsetp->fontname[j], size)) @@ -764,7 +764,7 @@ XVECTOR (info)->contents[0] = make_number (fontsetp->size); XVECTOR (info)->contents[1] = make_number (fontsetp->height); val = Qnil; - for (i = 0; i < MAX_CHARSET; i++) + for (i = 0; i <= MAX_CHARSET; i++) if (fontsetp->fontname[i]) { int font_idx = fontsetp->font_indexes[i]; diff -r 7c008ec99e97 -r 6637001cdb4b src/fontset.h --- a/src/fontset.h Tue Mar 18 23:31:34 1997 +0000 +++ b/src/fontset.h Tue Mar 18 23:31:34 1997 +0000 @@ -71,7 +71,7 @@ whose default value is defined in lisp/fontset.el. Since there's no charset whose id is 1, we use encoding[1] to store the encoding information decided by the font itself. */ - char encoding[MAX_CHARSET]; + char encoding[MAX_CHARSET + 1]; /* The baseline position of a font is normally `ascent' value of the font. However, there exists many fonts which don't set `ascent' @@ -114,7 +114,7 @@ height). In this case, the character is drawn beneath the previous glyphs. - This value is take from a private font property + This value is taken from a private font property `_MULE_RELATIVE_COMPOSE' which is introduced by Emacs. */ int relative_compose; @@ -142,12 +142,12 @@ int height; /* Table of font name for each character set. */ - char *fontname[MAX_CHARSET]; + char *fontname[MAX_CHARSET + 1]; /* Table of index numbers of fonts indexed by charset. If a font is not yet loaded, the value is -1 (FONT_NOT_OPENED). If font loading is failed, the value is -2 (FONT_NOT_FOUND). */ - int font_indexes[MAX_CHARSET]; + int font_indexes[MAX_CHARSET + 1]; }; /* This data type is used for the fontset_data field of struct frame. */ diff -r 7c008ec99e97 -r 6637001cdb4b src/xselect.c --- a/src/xselect.c Tue Mar 18 23:31:34 1997 +0000 +++ b/src/xselect.c Tue Mar 18 23:31:34 1997 +0000 @@ -1582,13 +1582,13 @@ { /* Since we are now handling multilingual text, we must consider sending back compound text. */ - char charsets[MAX_CHARSET]; + char charsets[MAX_CHARSET + 1]; int num; *format_ret = 8; *size_ret = XSTRING (obj)->size; *data_ret = XSTRING (obj)->data; - bzero (charsets, MAX_CHARSET); + bzero (charsets, MAX_CHARSET + 1); num = ((*size_ret <= 1) /* Check the possibility of short cut. */ ? 0 : find_charset_in_str (*data_ret, *size_ret, charsets));