From ee393555aad8ed4331c1711273c21f936fc09e29 Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 14 Dec 2001 10:01:45 +0000 Subject: [PATCH] Add header. --- idc.el | 40 +++++++++++++++++++++++++++++++++++++++- 1 file changed, 39 insertions(+), 1 deletion(-) diff --git a/idc.el b/idc.el index 16a1f35..c3e7dc9 100644 --- a/idc.el +++ b/idc.el @@ -1,3 +1,34 @@ +;;; idc.el --- Parser and utility for Ideographic Description Sequence. + +;; Copyright (C) 2001 MORIOKA Tomohiko + +;; Author: MORIOKA Tomohiko +;; Keywords: IDC, Ideographs, UCS, Unicode + +;; This file is a part of Tomoyo-Tools. + +;; This program is free software; you can redistribute it and/or +;; modify it under the terms of the GNU General Public License as +;; published by the Free Software Foundation; either version 2, or (at +;; your option) any later version. + +;; This program is distributed in the hope that it will be useful, but +;; WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;; General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program; see the file COPYING. If not, write to +;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. + +;;; Commentary: + +;; Ideographic Description Sequence is defined in ISO/IEC 10646-1:2000 +;; Annex F. + +;;; Code: + (defun idc-parse-terminal (string) (if (>= (length string) 1) (let* ((chr (aref string 0)) @@ -118,4 +149,11 @@ (put-char-attribute ret 'ideographic-structure struct))) ))))) -;; (idc-read-buffer "IDDef1.txt") \ No newline at end of file +;; (idc-read-buffer "IDDef1.txt") + +;;; @ End. +;;; + +(provide 'idc) + +;;; idc.el ends here -- 1.7.10.4