diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2012-08-17 10:08:30 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2012-08-17 10:08:30 -0700 |
| commit | 34dabdb7701594b83a5b35b034bba55855d256a5 (patch) | |
| tree | 860e8c22685321d157f71cd4a57c9c1162e69d54 /src/lisp.h | |
| parent | c24eb18ab40c3b022ab3b7d9c2aa26a37923340f (diff) | |
| download | emacs-34dabdb7701594b83a5b35b034bba55855d256a5.tar.gz | |
* lisp.h (set_char_table_extras): Rename from char_table_set_extras.
(set_char_table_contents): Rename from char_table_set_contents.
(set_sub_char_table_contents): Rename from sub_char_table_sub_contents.
All uses changed. See the end of
<http://lists.gnu.org/archive/html/emacs-devel/2012-08/msg00549.html>.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/lisp.h b/src/lisp.h index 6da1fe97c12..44a757f19c7 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -923,7 +923,7 @@ enum 8-bit European characters. Do not check validity of CT. */ #define CHAR_TABLE_SET(CT, IDX, VAL) \ (ASCII_CHAR_P (IDX) && SUB_CHAR_TABLE_P (XCHAR_TABLE (CT)->ascii) \ - ? sub_char_table_set_contents (XCHAR_TABLE (CT)->ascii, IDX, VAL) \ + ? set_sub_char_table_contents (XCHAR_TABLE (CT)->ascii, IDX, VAL) \ : char_table_set (CT, IDX, VAL)) enum CHARTAB_SIZE_BITS @@ -984,7 +984,7 @@ struct Lisp_Sub_Char_Table /* Minimum character covered by the sub char-table. */ Lisp_Object min_char; - /* Use sub_char_table_set_contents to set this. */ + /* Use set_sub_char_table_contents to set this. */ Lisp_Object contents[1]; }; @@ -2498,21 +2498,21 @@ set_char_table_purpose (Lisp_Object table, Lisp_Object val) /* Set different slots in (sub)character tables. */ LISP_INLINE void -char_table_set_extras (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) +set_char_table_extras (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) { eassert (0 <= idx && idx < CHAR_TABLE_EXTRA_SLOTS (XCHAR_TABLE (table))); XCHAR_TABLE (table)->extras[idx] = val; } LISP_INLINE void -char_table_set_contents (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) +set_char_table_contents (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) { eassert (0 <= idx && idx < (1 << CHARTAB_SIZE_BITS_0)); XCHAR_TABLE (table)->contents[idx] = val; } LISP_INLINE void -sub_char_table_set_contents (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) +set_sub_char_table_contents (Lisp_Object table, ptrdiff_t idx, Lisp_Object val) { XSUB_CHAR_TABLE (table)->contents[idx] = val; } |