X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fchartab.h;h=9bda38695427420212654cd51fab8052809ab985;hb=57db4f8770d5f0524dd68ace23683bf91a0f9528;hp=5800283c3ccccd764563f1fe508184b406fd7c5f;hpb=864447fd568460861c031507187fc08f09a588e3;p=chise%2Fxemacs-chise.git diff --git a/src/chartab.h b/src/chartab.h index 5800283..9bda386 100644 --- a/src/chartab.h +++ b/src/chartab.h @@ -431,38 +431,24 @@ get_char_id_table_ce (Lisp_Char_Table* cit, Emchar ch); INLINE_HEADER Lisp_Object get_char_id_table_ce (Lisp_Char_Table* cit, Emchar ch) { -#if 1 Lisp_Object val = get_char_id_table_0 (cit, ch); if (EQ (val, Qunloaded)) { +#if 0 val = load_char_attribute_maybe (cit, ch); - /* put_char_id_table_0 (cit, ch, val); */ - } - if (UNBOUNDP (val)) - return cit->default_value; - else - return val; #else - Lisp_Object val = get_char_id_table_0 (cit, ch); - - if (EQ (val, Qunloaded)) - { -#if 0 - val = load_char_attribute_maybe_cos (cit, ch); - if ( val == NULL ) + COS_object ret = load_char_attribute_maybe_cos (cit, ch); + if ( ret == NULL ) return cit->default_value; else - return val; -#else - val = load_char_attribute_maybe (cit, ch); + return ret; #endif } - if ( UNBOUNDP (val) ) + if (UNBOUNDP (val)) return cit->default_value; else return val; -#endif } #else #define get_char_id_table_ce(cit, ch) get_char_id_table(cit, ch)