]> code.delx.au - gnu-emacs/blobdiff - src/charset.h
Merge from gnus--devo--0
[gnu-emacs] / src / charset.h
index 3d31d903100a8d54940faab3aa7a0653d0927368..4b8bee4520d93f5cbef59c93d0225e69b0961c16 100644 (file)
@@ -339,7 +339,7 @@ extern struct charset *emacs_mule_charset[256];
 #define CHECK_CHARSET(x)                                       \
   do {                                                         \
     if (! SYMBOLP (x) || CHARSET_SYMBOL_HASH_INDEX (x) < 0)    \
-      x = wrong_type_argument (Qcharsetp, (x));                        \
+      wrong_type_argument (Qcharsetp, (x));                    \
   } while (0)
 
 
@@ -350,7 +350,7 @@ extern struct charset *emacs_mule_charset[256];
     int idx;                                                           \
                                                                        \
     if (! SYMBOLP (x) || (idx = CHARSET_SYMBOL_HASH_INDEX (x)) < 0)    \
-      x = wrong_type_argument (Qcharsetp, (x));                                \
+      wrong_type_argument (Qcharsetp, (x));                            \
     id = XINT (AREF (HASH_VALUE (XHASH_TABLE (Vcharset_hash_table), idx), \
                     charset_id));                                      \
   } while (0)
@@ -361,7 +361,7 @@ extern struct charset *emacs_mule_charset[256];
 #define CHECK_CHARSET_GET_ATTR(x, attr)                                \
   do {                                                                 \
     if (!SYMBOLP (x) || NILP (attr = CHARSET_SYMBOL_ATTRIBUTES (x)))   \
-      x = wrong_type_argument (Qcharsetp, (x));                                \
+      wrong_type_argument (Qcharsetp, (x));                            \
   } while (0)