From 15c60737b711af5fa22ea86db5b2b70156c4bec5 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 10 Apr 1997 22:12:04 +0000 Subject: [PATCH] (Fmake_category_set): Use XSETFASTINT. --- src/category.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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); } -- 2.39.5