diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-07-12 06:46:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-07-12 06:46:35 +0000 |
| commit | ea625b14aebfb68d14e9b25916e88cf6a4e03b1a (patch) | |
| tree | 2443281b25f57fcdfcc6401aa7fa22586758b1b4 /src/category.h | |
| parent | 6703ac4f59e2efcc2a05a721dc25839ca313dd15 (diff) | |
| download | emacs-ea625b14aebfb68d14e9b25916e88cf6a4e03b1a.tar.gz | |
(CATEGORY_DOCSTRING): Convert Fchar_table_extra_slot
argument to Lisp_Integer.
(CATEGORY_TABLE_VERSION): Likewise.
Diffstat (limited to 'src/category.h')
| -rw-r--r-- | src/category.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/category.h b/src/category.h index f646f9ddfcb..f1c40f9cff0 100644 --- a/src/category.h +++ b/src/category.h @@ -119,12 +119,12 @@ extern Lisp_Object _temp_category_set; /* Return the doc string of CATEGORY in category table TABLE. */ #define CATEGORY_DOCSTRING(table, category) \ - XVECTOR (Fchar_table_extra_slot (table, 0))->contents[(category) - ' '] + XVECTOR (Fchar_table_extra_slot (table, make_number (0)))->contents[(category) - ' '] /* Return the version number of category table TABLE. Not used for the moment. */ #define CATEGORY_TABLE_VERSION (table) \ - Fchar_table_extra_slot (table, 1) + Fchar_table_extra_slot (table, make_number (1)) /* Return 1 if there is a word boundary between two word-constituent characters C1 and C2 if they appear in this order, else return 0. |