From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 16 Sep 2022 02:20:20 +0000 (+0900)
Subject: (ids-dump-ucs-ext-h): New function.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=14b23fcedb309155c7b383a8f5c042f6c300bf89;p=chise%2Fids.git

(ids-dump-ucs-ext-h): New function.
---

diff --git a/ids-dump.el b/ids-dump.el
index c2e0798..e531c16 100644
--- a/ids-dump.el
+++ b/ids-dump.el
@@ -1,6 +1,6 @@
 ;;; ids-dump.el --- Dump utility of IDS-* files
 
-;; Copyright (C) 2002,2003,2004,2005,2009,2011,2019 MORIOKA Tomohiko
+;; Copyright (C) 2002,2003,2004,2005,2009,2011,2019,2022 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
 ;; Keywords: IDS, IDC, Ideographs, UCS, Unicode
@@ -345,6 +345,13 @@
 		  '(#x2F800 . #x2FA1D)))
 
 ;;;###autoload
+(defun ids-dump-ucs-ext-h (filename)
+  (interactive "Fdump IDS-UCS-Ext-H : ")
+  (ids-dump-range "IDS-UCS-Ext-H.txt" filename
+		  #'ids-dump-insert-ccs-ranges 'ucs "U+%04X\t%c\t%s\n"
+		  '(#x31350 . #x323AF)))
+
+;;;###autoload
 (defun ids-dump-cns11643-1 (filename)
   (interactive "Fdump IDS-CNS-1 : ")
   (ids-dump-range "IDS-CNS-1.txt" filename