# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 868689995 0
# Node ID 06cace23a912efa938aefaa2eed0da9238270f92
# Parent  d961aeafcebac6325474348547b809a13b4f0e4b
(CATEGORY_DOCSTRING): Convert Fchar_table_extra_slot
argument to Lisp_Integer.
(CATEGORY_TABLE_VERSION): Likewise.

diff -r d961aeafceba -r 06cace23a912 src/category.h
--- a/src/category.h	Sat Jul 12 06:46:21 1997 +0000
+++ b/src/category.h	Sat Jul 12 06:46:35 1997 +0000
@@ -119,12 +119,12 @@
 
 /* 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.