comparison src/coding.h @ 91813:ca1e1298a3d8

(smerge-auto-combine-max-separation): New var. (smerge-auto-combine): New fun.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 13 Feb 2008 15:10:57 +0000
parents 606f2d163a64
children 755365e1602a
comparison
equal deleted inserted replaced
91812:22cb32652c70 91813:ca1e1298a3d8
159 }; 159 };
160 160
161 161
162 /* Macros to access an element of an attribute vector. */ 162 /* Macros to access an element of an attribute vector. */
163 163
164 #define CODING_ATTR_BASE_NAME(attrs) AREF (attrs, coding_attr_base_name) 164 #define CODING_ATTR_BASE_NAME(attrs) ASLOT (attrs, coding_attr_base_name)
165 #define CODING_ATTR_TYPE(attrs) AREF (attrs, coding_attr_type) 165 #define CODING_ATTR_TYPE(attrs) ASLOT (attrs, coding_attr_type)
166 #define CODING_ATTR_CHARSET_LIST(attrs) AREF (attrs, coding_attr_charset_list) 166 #define CODING_ATTR_CHARSET_LIST(attrs) ASLOT (attrs, coding_attr_charset_list)
167 #define CODING_ATTR_MNEMONIC(attrs) AREF (attrs, coding_attr_mnemonic) 167 #define CODING_ATTR_MNEMONIC(attrs) ASLOT (attrs, coding_attr_mnemonic)
168 #define CODING_ATTR_DOCSTRING(attrs) AREF (attrs, coding_attr_docstring) 168 #define CODING_ATTR_DOCSTRING(attrs) ASLOT (attrs, coding_attr_docstring)
169 #define CODING_ATTR_ASCII_COMPAT(attrs) AREF (attrs, coding_attr_ascii_compat) 169 #define CODING_ATTR_ASCII_COMPAT(attrs) ASLOT (attrs, coding_attr_ascii_compat)
170 #define CODING_ATTR_DECODE_TBL(attrs) AREF (attrs, coding_attr_decode_tbl) 170 #define CODING_ATTR_DECODE_TBL(attrs) ASLOT (attrs, coding_attr_decode_tbl)
171 #define CODING_ATTR_ENCODE_TBL(attrs) AREF (attrs, coding_attr_encode_tbl) 171 #define CODING_ATTR_ENCODE_TBL(attrs) ASLOT (attrs, coding_attr_encode_tbl)
172 #define CODING_ATTR_TRANS_TBL(attrs) AREF (attrs, coding_attr_trans_tbl) 172 #define CODING_ATTR_TRANS_TBL(attrs) ASLOT (attrs, coding_attr_trans_tbl)
173 #define CODING_ATTR_POST_READ(attrs) AREF (attrs, coding_attr_post_read) 173 #define CODING_ATTR_POST_READ(attrs) ASLOT (attrs, coding_attr_post_read)
174 #define CODING_ATTR_PRE_WRITE(attrs) AREF (attrs, coding_attr_pre_write) 174 #define CODING_ATTR_PRE_WRITE(attrs) ASLOT (attrs, coding_attr_pre_write)
175 #define CODING_ATTR_DEFAULT_CHAR(attrs) AREF (attrs, coding_attr_default_char) 175 #define CODING_ATTR_DEFAULT_CHAR(attrs) ASLOT (attrs, coding_attr_default_char)
176 #define CODING_ATTR_FOR_UNIBYTE(attrs) AREF (attrs, coding_attr_for_unibyte) 176 #define CODING_ATTR_FOR_UNIBYTE(attrs) ASLOT (attrs, coding_attr_for_unibyte)
177 #define CODING_ATTR_FLUSHING(attrs) AREF (attrs, coding_attr_flushing) 177 #define CODING_ATTR_FLUSHING(attrs) ASLOT (attrs, coding_attr_flushing)
178 #define CODING_ATTR_PLIST(attrs) AREF (attrs, coding_attr_plist) 178 #define CODING_ATTR_PLIST(attrs) ASLOT (attrs, coding_attr_plist)
179 #define CODING_ATTR_CATEGORY(attrs) AREF (attrs, coding_attr_category) 179 #define CODING_ATTR_CATEGORY(attrs) ASLOT (attrs, coding_attr_category)
180 #define CODING_ATTR_SAFE_CHARSETS(attrs)AREF (attrs, coding_attr_safe_charsets) 180 #define CODING_ATTR_SAFE_CHARSETS(attrs)ASLOT (attrs, coding_attr_safe_charsets)
181 181
182 182
183 /* Return the name of a coding system specified by ID. */ 183 /* Return the name of a coding system specified by ID. */
184 #define CODING_ID_NAME(id) \ 184 #define CODING_ID_NAME(id) \
185 (HASH_KEY (XHASH_TABLE (Vcoding_system_hash_table), id)) 185 (HASH_KEY (XHASH_TABLE (Vcoding_system_hash_table), id))
239 { \ 239 { \
240 Fcheck_coding_system (x); \ 240 Fcheck_coding_system (x); \
241 spec = CODING_SYSTEM_SPEC (x); \ 241 spec = CODING_SYSTEM_SPEC (x); \
242 } \ 242 } \
243 if (NILP (spec)) \ 243 if (NILP (spec)) \
244 x = wrong_type_argument (Qcoding_system_p, (x)); \ 244 wrong_type_argument (Qcoding_system_p, (x)); \
245 } while (0) 245 } while (0)
246 246
247 247
248 /* Check if X is a coding system or not. If it is, set ID to the 248 /* Check if X is a coding system or not. If it is, set ID to the
249 ID of the coding system. */ 249 ID of the coding system. */
256 { \ 256 { \
257 Fcheck_coding_system (x); \ 257 Fcheck_coding_system (x); \
258 id = CODING_SYSTEM_ID (x); \ 258 id = CODING_SYSTEM_ID (x); \
259 } \ 259 } \
260 if (id < 0) \ 260 if (id < 0) \
261 x = wrong_type_argument (Qcoding_system_p, (x)); \ 261 wrong_type_argument (Qcoding_system_p, (x)); \
262 } while (0) 262 } while (0)
263 263
264 264
265 /*** GENERAL section ***/ 265 /*** GENERAL section ***/
266 266