aboutsummaryrefslogtreecommitdiffstats
path: root/src/category.c
diff options
context:
space:
mode:
authorKenichi Handa1997-03-18 23:31:34 +0000
committerKenichi Handa1997-03-18 23:31:34 +0000
commitcecda31486b7ab7219a51d37b2fee0afc9ff31ee (patch)
tree2a56a7b30b5316a0808b0a0f7480383f61a68251 /src/category.c
parent513ee44261593360bdfa5e83ff46ba5d41873a47 (diff)
downloademacs-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.c8
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 }