From: Koichi KAMICHI <kamichi@fonts.jp>
Date: Sun, 12 Feb 2006 02:49:01 +0000 (+0000)
Subject: Added decode_char method.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5e60800e36f1de040d708e9cb982d47d08319742;p=chise%2Fkage.git

Added decode_char method.
---

diff --git a/tools/chiseperl.pl b/tools/chiseperl.pl
index 273faa7..4ba8911 100755
--- a/tools/chiseperl.pl
+++ b/tools/chiseperl.pl
@@ -10,6 +10,7 @@
 #            $var get_feature_value($feature, $char_id);
 #            $var set_feature_value($feature, $char_id, $value);
 #            $var create_new_char($feature, $value);
+#            $char_id decode_char($feature_char, $int);
 
 use chise_tools;
 use chise;
@@ -80,4 +81,11 @@ sub update_chise{ # save added data to database
   }
 }
 
+sub decode_char{ # feature, int -> charID, 0
+  if(scalar(@_) != 2){
+    return 0;
+  }
+  return chise::chise_ds_decode_char($chise_ds, chise_tools::get_uchar($_[0]), $_[1]);
+}
+
 1;