X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=non-ideo-dump.el;h=f8189522d8306432374799cac04d732e10ffcdd6;hb=e537a1c449598802e1129f1347b0ae5f9d38d528;hp=a487aa9ad159db76358da41213d7c34b8d2d5a93;hpb=622bd64c083a4dd15a98e178d55d030e89c69947;p=chise%2Ftomoyo-tools.git diff --git a/non-ideo-dump.el b/non-ideo-dump.el index a487aa9..f818952 100644 --- a/non-ideo-dump.el +++ b/non-ideo-dump.el @@ -1,3 +1,4 @@ +(require 'char-db-util) (let ((ranges '((#x0000 #x001F "u00000-C0.el") (#x0020 #x007F "u00020-Basic-Latin.el") @@ -17,10 +18,27 @@ (#x0780 #x07BF "u00780-Thaana.el") (#x0900 #x097F "u00900-Devanagari.el") (#x0980 #x09FF "u00980-Bengali.el") + (#x0A00 #x0A7F "u00A00-Gurmukhi.el") + (#x0A80 #x0AFF "u00A80-Gujarati.el") + (#x0B00 #x0B7F "u00B00-Oriya.el") + (#x0B80 #x0BFF "u00B80-Tamil.el") + (#x0C00 #x0C7F "u00C00-Telugu.el") + (#x0C80 #x0CFF "u00C80-Kannada.el") + (#x0D00 #x0D7F "u00D00-Malayalam.el") + (#x0D80 #x0DFF "u00D80-Sinhala.el") (#x0E00 #x0E7F "u00E00-Thai.el") (#x0E80 #x0EFF "u00E80-Lao.el") + (#x0F00 #x0FFF "u00F00-Tibetan.el") + (#x1000 #x109F "u01000-Myanmar.el") + (#x10A0 #x10FF "u010A0-Georgian.el") + (#x1100 #x11FF "u01100-Hangul-Jamo.el") (#x1200 #x137C "u01200-Ethiopic.el") (#x13A0 #x13FF "u013A0-Cherokee.el") + (#x1400 #x167F "u01400-Canadian.el") + (#x1680 #x169F "u01680-Ogham.el") + (#x16A0 #x16FF "u016A0-Runic.el") + (#x1780 #x17FF "u01780-Khmer.el") + (#x1800 #x18AF "u01800-Mongolian.el") (#x1E00 #x1EFF "u01E00-Latin-Extended-Additional.el") (#x1F00 #x1FFF "u01F00-Greek-Extended.el") (#x2000 #x206F "u02000-General-Punctuation.el") @@ -55,7 +73,11 @@ (#x3200 #x32FF "u03200-Enclosed-CJK-Letters-and-Months.el") (#x3300 #x33FF "u03300-CJK-Compatibility.el") ;; snip CJK Unified Ideographs + (#xA000 #xA48F "u0A000-Yi-Syllables.el") + (#xA490 #xA4CF "u0A490-Yi-Radicals.el") + (#xAC00 #xD7AF "u0AC00-Hangul-Syllables.el") (#xE000 #xF8FF "u0E000-Private-Use.el") + ;; snip CJK Compatibility Ideographs (#xFB00 #xFB4F "u0FB00-Alphabetic-Presentation-Forms.el") (#xFB50 #xFDFF "u0FB50-Arabic-Presentation-Forms-A.el") (#xFE20 #xFE2F "u0FE20-Combining-Half-Marks.el") @@ -63,6 +85,7 @@ (#xFE50 #xFE6F "u0FE50-Small-Form-Variants.el") (#xFE70 #xFEFF "u0FE70-Arabic-Presentation-Forms-B.el") (#xFF00 #xFFEF "u0FF00-Halfwidth-and-Fullwidth-Forms.el") + (#xFFF0 #xFFFF "u0FFF0-Specials.el") ))) (dolist (range ranges) (write-char-range-data-to-file