diff options
author | Miles Bader <miles@gnu.org> | 2006-07-19 00:42:56 +0000 |
---|---|---|
committer | Miles Bader <miles@gnu.org> | 2006-07-19 00:42:56 +0000 |
commit | 63db3c1b3ffa669435b10aa362115ef664990ab2 (patch) | |
tree | a62f68b147d4265ce993136af897d4f348570594 /src/category.h | |
parent | 2988d6b36d310ba98ea1fed570142f436804fc18 (diff) | |
parent | 83676aa2e399363120942ef5ea19f8af6b75e8e8 (diff) | |
download | emacs-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.h | 12 |
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))'. */ |