Mercurial > hg > xemacs-beta

comparison tests/automated/mule-tests.el @ 3695:42e4605ef1de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2006-11-23 13:43:17 by aidan] Handle bytes in the range 0x80-0xC0 better when dealing with ISO-IR 196.
author aidan
date Thu, 23 Nov 2006 13:43:29 +0000
parents d6a215ad08b8
children 58f19b254a23
comparison
equal deleted inserted replaced
3694:a30f3a38c4ae 3695:42e4605ef1de
439 (Assert (and (eq (aref ccl-vector 3) 439 (Assert (and (eq (aref ccl-vector 3)
440 (encode-char (make-char 'control-1 0) 'ucs)) 440 (encode-char (make-char 'control-1 0) 'ucs))
441 (eq (aref ccl-vector 4) 441 (eq (aref ccl-vector 4)
442 (encode-char (make-char 'control-1 31) 'ucs))))) 442 (encode-char (make-char 'control-1 31) 'ucs)))))
443 443
444 ;; This used to crash, at least in debug builds:
445
446 (Assert (decode-coding-string
447 (string ?\33 ?\45 ?\107 ?\306 ?\222 ?\215 ?\306)
448 'iso-2022-jp))
449
444 ;;--------------------------------------------------------------- 450 ;;---------------------------------------------------------------
445 ;; Test charset-in-* functions 451 ;; Test charset-in-* functions
446 ;;--------------------------------------------------------------- 452 ;;---------------------------------------------------------------
447 (with-temp-buffer 453 (with-temp-buffer
448 (insert-file-contents (locate-data-file "HELLO")) 454 (insert-file-contents (locate-data-file "HELLO"))