Mercurial > hg > xemacs-beta

comparison tests/automated/mule-tests.el @ 4688:7e54adf407a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix a bug with Unicode error sequences and very short input strings. src/ChangeLog addition: 2009-09-11 Aidan Kehoe <kehoea@parhasard.net> * unicode.c (unicode_convert): Fix a bug with error sequences and very short input strings. tests/ChangeLog addition: 2009-09-11 Aidan Kehoe <kehoea@parhasard.net> * automated/mule-tests.el (featurep): Check that a Unicode bug with very short inputs has been fixed.
author Aidan Kehoe <kehoea@parhasard.net>
date Fri, 11 Sep 2009 17:54:07 +0100
parents 938ffa3ffe4d
children 257b468bf2ca
comparison
equal deleted inserted replaced
4687:02b7c7189041 4688:7e54adf407a1
755 (#xD800 #xDBFF) t 755 (#xD800 #xDBFF) t
756 (#xDC00 #xDFFF) t)) 756 (#xDC00 #xDFFF) t))
757 do (unless (get-range-table i exceptions) 757 do (unless (get-range-table i exceptions)
758 (read (format (if (> i #xFFFF) #r"?\U%08X" #r"?\u%04X") i))) 758 (read (format (if (> i #xFFFF) #r"?\U%08X" #r"?\u%04X") i)))
759 finally return t)) 759 finally return t))
760 (loop
761 for i from #x00 to #xff
762 do (Assert
763 (= 1 (length (decode-coding-string (format "%c" i) 'utf-8-unix)))
764 (format
765 "checking Unicode coding systems behave well with short input, %02X"
766 i)))
760 ) 767 )