changeset 17369:566b26e1930e

(Fmake_category_set): Use XSETFASTINT.
author Karl Heuer <kwzh@gnu.org>
date Thu, 10 Apr 1997 22:12:04 +0000
parents 265aa4625114
children 6db43d8c9dfc
files src/category.c
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/category.c	Thu Apr 10 21:53:28 1997 +0000
+++ b/src/category.c	Thu Apr 10 22:12:04 1997 +0000
@@ -67,8 +67,9 @@
   len = XSTRING (categories)->size;
   while (--len >= 0)
     {
-      Lisp_Object category = make_number (XSTRING (categories)->data[len]);
+      Lisp_Object category;
 
+      XSETFASTINT (category, XSTRING (categories)->data[len]);
       CHECK_CATEGORY (category, 0);
       SET_CATEGORY_SET (val, category, Qt);
     }