aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa2003-03-28 04:09:32 +0000
committerKenichi Handa2003-03-28 04:09:32 +0000
commit880cf180d910f61ed0a445e0e7f2a5537df9c442 (patch)
tree82f31c43b63f0bac0564cc80127a6f564689107a /src
parent2588a6d7c3c06411508c7194b78cac2db9eb9083 (diff)
downloademacs-880cf180d910f61ed0a445e0e7f2a5537df9c442.tar.gz
emacs-880cf180d910f61ed0a445e0e7f2a5537df9c442.zip
(Qutf_16_be_nosig, Qutf_16_be, Qutf_16_le_nosig)
(Qutf_16_le): Remove these variables. (syms_of_coding): Don't DEFSYM them. (decode_coding_utf_16): Fix handling of BOM. (encode_coding_utf_16): Fix handling of BOM.
Diffstat (limited to 'src')
-rw-r--r--src/coding.c15
1 files changed, 5 insertions, 10 deletions
diff --git a/src/coding.c b/src/coding.c
index 88f7c3f386f..3869550a97e 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -308,7 +308,6 @@ Lisp_Object Qpost_read_conversion, Qpre_write_conversion;
308Lisp_Object Qdefault_char; 308Lisp_Object Qdefault_char;
309Lisp_Object Qno_conversion, Qundecided; 309Lisp_Object Qno_conversion, Qundecided;
310Lisp_Object Qcharset, Qiso_2022, Qutf_8, Qutf_16, Qshift_jis, Qbig5; 310Lisp_Object Qcharset, Qiso_2022, Qutf_8, Qutf_16, Qshift_jis, Qbig5;
311Lisp_Object Qutf_16_be_nosig, Qutf_16_be, Qutf_16_le_nosig, Qutf_16_le;
312Lisp_Object Qsignature, Qendian, Qbig, Qlittle; 311Lisp_Object Qsignature, Qendian, Qbig, Qlittle;
313Lisp_Object Qcoding_system_history; 312Lisp_Object Qcoding_system_history;
314Lisp_Object Qvalid_codes; 313Lisp_Object Qvalid_codes;
@@ -1405,7 +1404,7 @@ decode_coding_utf_16 (coding)
1405 if (bom == utf_16_with_bom) 1404 if (bom == utf_16_with_bom)
1406 { 1405 {
1407 if (endian == utf_16_big_endian 1406 if (endian == utf_16_big_endian
1408 ? c != 0xFFFE : c != 0xFEFF) 1407 ? c != 0xFEFF : c != 0xFFFE)
1409 { 1408 {
1410 /* We are sure that there's enouph room at CHARBUF. */ 1409 /* We are sure that there's enouph room at CHARBUF. */
1411 *charbuf++ = c1; 1410 *charbuf++ = c1;
@@ -1415,10 +1414,10 @@ decode_coding_utf_16 (coding)
1415 } 1414 }
1416 else 1415 else
1417 { 1416 {
1418 if (c == 0xFFFE) 1417 if (c == 0xFEFF)
1419 CODING_UTF_16_ENDIAN (coding) 1418 CODING_UTF_16_ENDIAN (coding)
1420 = endian = utf_16_big_endian; 1419 = endian = utf_16_big_endian;
1421 else if (c == 0xFEFF) 1420 else if (c == 0xFFFE)
1422 CODING_UTF_16_ENDIAN (coding) 1421 CODING_UTF_16_ENDIAN (coding)
1423 = endian = utf_16_little_endian; 1422 = endian = utf_16_little_endian;
1424 else 1423 else
@@ -1505,9 +1504,9 @@ encode_coding_utf_16 (coding)
1505 { 1504 {
1506 ASSURE_DESTINATION (safe_room); 1505 ASSURE_DESTINATION (safe_room);
1507 if (big_endian) 1506 if (big_endian)
1508 EMIT_TWO_BYTES (0xFF, 0xFE);
1509 else
1510 EMIT_TWO_BYTES (0xFE, 0xFF); 1507 EMIT_TWO_BYTES (0xFE, 0xFF);
1508 else
1509 EMIT_TWO_BYTES (0xFF, 0xFE);
1511 CODING_UTF_16_BOM (coding) = utf_16_without_bom; 1510 CODING_UTF_16_BOM (coding) = utf_16_without_bom;
1512 } 1511 }
1513 1512
@@ -8413,10 +8412,6 @@ syms_of_coding ()
8413 DEFSYM (Qutf_8, "utf-8"); 8412 DEFSYM (Qutf_8, "utf-8");
8414 8413
8415 DEFSYM (Qutf_16, "utf-16"); 8414 DEFSYM (Qutf_16, "utf-16");
8416 DEFSYM (Qutf_16_be, "utf-16-be");
8417 DEFSYM (Qutf_16_be_nosig, "utf-16-be-nosig");
8418 DEFSYM (Qutf_16_le, "utf-16-l3");
8419 DEFSYM (Qutf_16_le_nosig, "utf-16-le-nosig");
8420 DEFSYM (Qsignature, "signature"); 8415 DEFSYM (Qsignature, "signature");
8421 DEFSYM (Qendian, "endian"); 8416 DEFSYM (Qendian, "endian");
8422 DEFSYM (Qbig, "big"); 8417 DEFSYM (Qbig, "big");