emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/src/coding.h,v


From: Stefan Monnier
Subject: [Emacs-diffs] Changes to emacs/src/coding.h,v
Date: Wed, 13 Feb 2008 15:11:00 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/02/13 15:10:59

Index: src/coding.h
===================================================================
RCS file: /sources/emacs/emacs/src/coding.h,v
retrieving revision 1.88
retrieving revision 1.89
diff -u -b -r1.88 -r1.89
--- src/coding.h        1 Feb 2008 16:00:58 -0000       1.88
+++ src/coding.h        13 Feb 2008 15:10:56 -0000      1.89
@@ -161,23 +161,23 @@
 
 /* Macros to access an element of an attribute vector.  */
 
-#define CODING_ATTR_BASE_NAME(attrs)   AREF (attrs, coding_attr_base_name)
-#define CODING_ATTR_TYPE(attrs)                AREF (attrs, coding_attr_type)
-#define CODING_ATTR_CHARSET_LIST(attrs)        AREF (attrs, 
coding_attr_charset_list)
-#define CODING_ATTR_MNEMONIC(attrs)    AREF (attrs, coding_attr_mnemonic)
-#define CODING_ATTR_DOCSTRING(attrs)   AREF (attrs, coding_attr_docstring)
-#define CODING_ATTR_ASCII_COMPAT(attrs)        AREF (attrs, 
coding_attr_ascii_compat)
-#define CODING_ATTR_DECODE_TBL(attrs)  AREF (attrs, coding_attr_decode_tbl)
-#define CODING_ATTR_ENCODE_TBL(attrs)  AREF (attrs, coding_attr_encode_tbl)
-#define CODING_ATTR_TRANS_TBL(attrs)   AREF (attrs, coding_attr_trans_tbl)
-#define CODING_ATTR_POST_READ(attrs)   AREF (attrs, coding_attr_post_read)
-#define CODING_ATTR_PRE_WRITE(attrs)   AREF (attrs, coding_attr_pre_write)
-#define CODING_ATTR_DEFAULT_CHAR(attrs)        AREF (attrs, 
coding_attr_default_char)
-#define CODING_ATTR_FOR_UNIBYTE(attrs) AREF (attrs, coding_attr_for_unibyte)
-#define CODING_ATTR_FLUSHING(attrs)    AREF (attrs, coding_attr_flushing)
-#define CODING_ATTR_PLIST(attrs)       AREF (attrs, coding_attr_plist)
-#define CODING_ATTR_CATEGORY(attrs)    AREF (attrs, coding_attr_category)
-#define CODING_ATTR_SAFE_CHARSETS(attrs)AREF (attrs, coding_attr_safe_charsets)
+#define CODING_ATTR_BASE_NAME(attrs)   ASLOT (attrs, coding_attr_base_name)
+#define CODING_ATTR_TYPE(attrs)                ASLOT (attrs, coding_attr_type)
+#define CODING_ATTR_CHARSET_LIST(attrs)        ASLOT (attrs, 
coding_attr_charset_list)
+#define CODING_ATTR_MNEMONIC(attrs)    ASLOT (attrs, coding_attr_mnemonic)
+#define CODING_ATTR_DOCSTRING(attrs)   ASLOT (attrs, coding_attr_docstring)
+#define CODING_ATTR_ASCII_COMPAT(attrs)        ASLOT (attrs, 
coding_attr_ascii_compat)
+#define CODING_ATTR_DECODE_TBL(attrs)  ASLOT (attrs, coding_attr_decode_tbl)
+#define CODING_ATTR_ENCODE_TBL(attrs)  ASLOT (attrs, coding_attr_encode_tbl)
+#define CODING_ATTR_TRANS_TBL(attrs)   ASLOT (attrs, coding_attr_trans_tbl)
+#define CODING_ATTR_POST_READ(attrs)   ASLOT (attrs, coding_attr_post_read)
+#define CODING_ATTR_PRE_WRITE(attrs)   ASLOT (attrs, coding_attr_pre_write)
+#define CODING_ATTR_DEFAULT_CHAR(attrs)        ASLOT (attrs, 
coding_attr_default_char)
+#define CODING_ATTR_FOR_UNIBYTE(attrs) ASLOT (attrs, coding_attr_for_unibyte)
+#define CODING_ATTR_FLUSHING(attrs)    ASLOT (attrs, coding_attr_flushing)
+#define CODING_ATTR_PLIST(attrs)       ASLOT (attrs, coding_attr_plist)
+#define CODING_ATTR_CATEGORY(attrs)    ASLOT (attrs, coding_attr_category)
+#define CODING_ATTR_SAFE_CHARSETS(attrs)ASLOT (attrs, 
coding_attr_safe_charsets)
 
 
 /* Return the name of a coding system specified by ID.  */
@@ -241,7 +241,7 @@
        spec = CODING_SYSTEM_SPEC (x);                  \
       }                                                        \
     if (NILP (spec))                                   \
-      x = wrong_type_argument (Qcoding_system_p, (x)); \
+      wrong_type_argument (Qcoding_system_p, (x));     \
   } while (0)
 
 
@@ -258,7 +258,7 @@
          id = CODING_SYSTEM_ID (x);                            \
        }                                                       \
       if (id < 0)                                              \
-       x = wrong_type_argument (Qcoding_system_p, (x));        \
+       wrong_type_argument (Qcoding_system_p, (x));    \
     } while (0)
 
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]