Mercurial > emacs

comparison src/coding.c @ 112434:9de5a68b57e1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Promote SSDATA macro from gtkutil.c and xsmfns.c to lisp.h.
author Paul Eggert <eggert@cs.ucla.edu>
date Sat, 22 Jan 2011 18:56:06 -0800
parents 42e22c4f06b7
children
comparison
equal deleted inserted replaced
112433:7b649f6eac4f 112434:9de5a68b57e1
5378 5378
5379 coding = &coding_categories[coding_category_charset]; 5379 coding = &coding_categories[coding_category_charset];
5380 attrs = CODING_ID_ATTRS (coding->id); 5380 attrs = CODING_ID_ATTRS (coding->id);
5381 valids = AREF (attrs, coding_attr_charset_valids); 5381 valids = AREF (attrs, coding_attr_charset_valids);
5382 name = CODING_ID_NAME (coding->id); 5382 name = CODING_ID_NAME (coding->id);
5383 if (strncmp ((char *) SDATA (SYMBOL_NAME (name)), 5383 if (strncmp (SSDATA (SYMBOL_NAME (name)),
5384 "iso-8859-", sizeof ("iso-8859-") - 1) == 0 5384 "iso-8859-", sizeof ("iso-8859-") - 1) == 0
5385 || strncmp ((char *) SDATA (SYMBOL_NAME (name)), 5385 || strncmp (SSDATA (SYMBOL_NAME (name)),
5386 "iso-latin-", sizeof ("iso-latin-") - 1) == 0) 5386 "iso-latin-", sizeof ("iso-latin-") - 1) == 0)
5387 check_latin_extra = 1; 5387 check_latin_extra = 1;
5388 5388
5389 if (! NILP (CODING_ATTR_ASCII_COMPAT (attrs))) 5389 if (! NILP (CODING_ATTR_ASCII_COMPAT (attrs)))
5390 src += head_ascii; 5390 src += head_ascii;
10825 if (! NILP (Vlocale_coding_system)) 10825 if (! NILP (Vlocale_coding_system))
10826 { 10826 {
10827 Lisp_Object dec = code_convert_string_norecord (build_string (str), 10827 Lisp_Object dec = code_convert_string_norecord (build_string (str),
10828 Vlocale_coding_system, 10828 Vlocale_coding_system,
10829 0); 10829 0);
10830 str = (char *) SDATA (dec); 10830 str = SSDATA (dec);
10831 } 10831 }
10832 10832
10833 return str; 10833 return str;
10834 } 10834 }
10835 10835