Mercurial > emacs
changeset 60305:a878c25f56db
(ccl-encode-mule-utf-16le): Fix
BUFFER_MAGNIFICATION to 2.
(ccl-encode-mule-utf-16be): Likewise.
(ccl-encode-mule-utf-16le-with-signature): Fix
BUFFER_MAGNIFICATION to 4.
(ccl-encode-mule-utf-16be-with-signature): Likewise.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 28 Feb 2005 07:15:42 +0000 |
| parents | 7f27833efe51 |
| children | f0819ce6d7e4 |
| files | lisp/international/utf-16.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/utf-16.el Mon Feb 28 06:18:37 2005 +0000 +++ b/lisp/international/utf-16.el Mon Feb 28 07:15:42 2005 +0000 @@ -391,7 +391,7 @@ (define-ccl-program ccl-encode-mule-utf-16le - `(1 + `(2 ,utf-16le-encode-loop) "Encode to UTF-16LE (little endian without signature). Characters from the charsets ascii, eight-bit-control, @@ -401,7 +401,7 @@ Others are encoded as U+FFFD.") (define-ccl-program ccl-encode-mule-utf-16be - `(1 + `(2 ,utf-16be-encode-loop) "Encode to UTF-16BE (big endian without signature). Characters from the charsets ascii, eight-bit-control, @@ -411,7 +411,7 @@ Others are encoded as U+FFFD.") (define-ccl-program ccl-encode-mule-utf-16le-with-signature - `(1 + `(4 ((write #xFF) (write #xFE) ,@utf-16le-encode-loop)) @@ -423,7 +423,7 @@ Others are encoded as U+FFFD.") (define-ccl-program ccl-encode-mule-utf-16be-with-signature - `(1 + `(4 ((write #xFE) (write #xFF) ,@utf-16be-encode-loop))