Mercurial > hg > xemacs-beta

view etc/unicode/mule-ucs/README @ 5042:f395ee7ad844

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix some compile warnings, make vdb test code conditional on DEBUG_XEMACS -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-02-15 Ben Wing <ben@xemacs.org> * mc-alloc.c: * mc-alloc.c (mc_realloc_1): * mc-alloc.c (set_dirty_bit): * mc-alloc.c (set_dirty_bit_for_address): * mc-alloc.c (get_dirty_bit): * mc-alloc.c (get_dirty_bit_for_address): * mc-alloc.c (set_protection_bit): * mc-alloc.c (set_protection_bit_for_address): * mc-alloc.c (get_protection_bit): * mc-alloc.c (get_protection_bit_for_address): * mc-alloc.c (get_page_start): * vdb-win32.c (win32_fault_handler): * vdb.c: Fix some compile warnings, make vdb test code conditional on DEBUG_XEMACS.
author Ben Wing <ben@xemacs.org>
date Mon, 15 Feb 2010 21:52:39 -0600
parents a29c4eef8f00
children
line wrap: on
line source

The files in this directory were converted from data in the mule-ucs
package (mule-ucs/lisp/reldata/*), using this code:

(defun convert-mule-ucs-file (start end)
  (interactive "r")
  (with-output-to-temp-buffer "*mule-ucs-convert*"
    (save-excursion
      (goto-char start)
      (while (re-search-forward "(\\?\\(.\\) \\. \"\\(.*\\)\") ;+ \\(.*\\)$"
				end t)
	(let ((ch (string-to-char (match-string 1)))
	      (codepoint (match-string 2))
	      (name (match-string 3)))
	  (if (= 1 (charset-dimension (char-charset ch)))
	      (princ (format "0x%x   %s  #   %s\n" (char-octet ch) codepoint name))
	    (princ (format "0x%x%x   %s  #   %s\n" (char-octet ch 0) (char-octet ch 1) codepoint name))))))))

Each file is named after the XEmacs charset it represents.  The CNS files
contain more codepoints than those in unicode-consortium/ because they list
codepoints above 0xFFFF, those handled by surrogates (supported starting in
Windows 2000, I think, but not yet by XEmacs).