summaryrefslogtreecommitdiff
path: root/src/category.h
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2006-07-19 00:42:56 +0000
committerMiles Bader <miles@gnu.org>2006-07-19 00:42:56 +0000
commit63db3c1b3ffa669435b10aa362115ef664990ab2 (patch)
treea62f68b147d4265ce993136af897d4f348570594 /src/category.h
parent2988d6b36d310ba98ea1fed570142f436804fc18 (diff)
parent83676aa2e399363120942ef5ea19f8af6b75e8e8 (diff)
downloademacs-63db3c1b3ffa669435b10aa362115ef664990ab2.tar.gz
Merge from emacs--devo--0
Patches applied: * emacs--devo--0 (patch 343-356) - Update from CVS - Update for ERC 5.1.3. - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 113-115) - Merge from emacs--devo--0 - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-90
Diffstat (limited to 'src/category.h')
-rw-r--r--src/category.h12
1 files changed, 4 insertions, 8 deletions
diff --git a/src/category.h b/src/category.h
index fc755ed7d86..4799b7a5e3d 100644
--- a/src/category.h
+++ b/src/category.h
@@ -57,10 +57,8 @@ Boston, MA 02110-1301, USA. */
#define CATEGORYP(x) \
(INTEGERP ((x)) && XFASTINT ((x)) >= 0x20 && XFASTINT ((x)) <= 0x7E)
-#define CHECK_CATEGORY(x) \
- do { \
- if (!CATEGORYP ((x))) x = wrong_type_argument (Qcategoryp, (x)); \
- } while (0)
+#define CHECK_CATEGORY(x) \
+ CHECK_TYPE (CATEGORYP (x), Qcategoryp, x)
#define XCATEGORY_SET XBOOL_VECTOR
@@ -75,10 +73,8 @@ Boston, MA 02110-1301, USA. */
#define SET_CATEGORY_SET(category_set, category, val) \
(Faset (category_set, category, val))
-#define CHECK_CATEGORY_SET(x) \
- do { \
- if (!CATEGORY_SET_P ((x))) x = wrong_type_argument (Qcategorysetp, (x)); \
- } while (0)
+#define CHECK_CATEGORY_SET(x) \
+ CHECK_TYPE (CATEGORY_SET_P (x), Qcategorysetp, x)
/* Return 1 if CATEGORY_SET contains CATEGORY, else return 0.
The faster version of `!NILP (Faref (category_set, category))'. */