From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 10 Apr 1997 22:12:04 +0000 (+0000)
Subject: (Fmake_category_set): Use XSETFASTINT.
X-Git-Tag: emacs-20.1~2576
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=15c60737b711af5fa22ea86db5b2b70156c4bec5;p=emacs.git

(Fmake_category_set): Use XSETFASTINT.
---

diff --git a/src/category.c b/src/category.c
index cd87abd5637..b644448b486 100644
--- a/src/category.c
+++ b/src/category.c
@@ -67,8 +67,9 @@ CATEGORIES is a string of category mnemonics.")
   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);
     }