Mercurial > emacs
diff src/category.c @ 18613:614b916ff5bf
Fix bugs with inappropriate mixing of Lisp_Object with int.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 04 Jul 1997 20:44:52 +0000 |
parents | 33e78cc7f058 |
children | 315acc2627fe |
line wrap: on
line diff
--- a/src/category.c Fri Jul 04 20:43:49 1997 +0000 +++ b/src/category.c Fri Jul 04 20:44:52 1997 +0000 @@ -574,8 +574,8 @@ if (CONSP (elt) && CATEGORYP (XCONS (elt)->car) && CATEGORYP (XCONS (elt)->cdr) - && CATEGORY_MEMBER (XCONS (elt)->car, category_set1) - && CATEGORY_MEMBER (XCONS (elt)->cdr, category_set2)) + && CATEGORY_MEMBER (XFASTINT (XCONS (elt)->car), category_set1) + && CATEGORY_MEMBER (XFASTINT (XCONS (elt)->cdr), category_set2)) return !default_result; } return default_result;