diff options
| author | Kenichi Handa | 1997-03-18 23:31:34 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1997-03-18 23:31:34 +0000 |
| commit | cecda31486b7ab7219a51d37b2fee0afc9ff31ee (patch) | |
| tree | 2a56a7b30b5316a0808b0a0f7480383f61a68251 /src/category.c | |
| parent | 513ee44261593360bdfa5e83ff46ba5d41873a47 (diff) | |
| download | emacs-cecda31486b7ab7219a51d37b2fee0afc9ff31ee.tar.gz emacs-cecda31486b7ab7219a51d37b2fee0afc9ff31ee.zip | |
Adjusted for the change of CHAR_TABLE_ORDINARY_SLOTS.
Diffstat (limited to 'src/category.c')
| -rw-r--r-- | src/category.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/category.c b/src/category.c index 1b1c1878c93..58d5f41a617 100644 --- a/src/category.c +++ b/src/category.c | |||
| @@ -352,7 +352,7 @@ If optional forth argument RESET is non NIL,\n\ | |||
| 352 | 352 | ||
| 353 | set_value = NILP (reset) ? Qt : Qnil; | 353 | set_value = NILP (reset) ? Qt : Qnil; |
| 354 | 354 | ||
| 355 | if (SINGLE_BYTE_CHAR_P (c)) | 355 | if ((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS) |
| 356 | { | 356 | { |
| 357 | val = XCHAR_TABLE (table)->contents[c]; | 357 | val = XCHAR_TABLE (table)->contents[c]; |
| 358 | if (!CATEGORY_SET_P (val)) | 358 | if (!CATEGORY_SET_P (val)) |
| @@ -366,11 +366,11 @@ If optional forth argument RESET is non NIL,\n\ | |||
| 366 | SPLIT_NON_ASCII_CHAR (c, charset, c1, c2); | 366 | SPLIT_NON_ASCII_CHAR (c, charset, c1, c2); |
| 367 | 367 | ||
| 368 | /* The top level table. */ | 368 | /* The top level table. */ |
| 369 | val = XCHAR_TABLE (table)->contents[charset]; | 369 | val = XCHAR_TABLE (table)->contents[charset + 128]; |
| 370 | if (NILP (val)) | 370 | if (NILP (val)) |
| 371 | { | 371 | { |
| 372 | category_set = MAKE_CATEGORY_SET; | 372 | category_set = MAKE_CATEGORY_SET; |
| 373 | XCHAR_TABLE (table)->contents[charset] = category_set; | 373 | XCHAR_TABLE (table)->contents[charset + 128] = category_set; |
| 374 | } | 374 | } |
| 375 | else if (CATEGORY_SET_P (val)) | 375 | else if (CATEGORY_SET_P (val)) |
| 376 | category_set = val; | 376 | category_set = val; |
| @@ -390,7 +390,7 @@ If optional forth argument RESET is non NIL,\n\ | |||
| 390 | if (!CHAR_TABLE_P (val)) | 390 | if (!CHAR_TABLE_P (val)) |
| 391 | { | 391 | { |
| 392 | val = Fmake_char_table (Qnil, Qnil); | 392 | val = Fmake_char_table (Qnil, Qnil); |
| 393 | XCHAR_TABLE (table)->contents[charset] = val; | 393 | XCHAR_TABLE (table)->contents[charset + 128] = val; |
| 394 | /* We must set default category set of CHARSET in `defalt' slot. */ | 394 | /* We must set default category set of CHARSET in `defalt' slot. */ |
| 395 | XCHAR_TABLE (val)->defalt = category_set; | 395 | XCHAR_TABLE (val)->defalt = category_set; |
| 396 | } | 396 | } |