# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1239935752 0
# Node ID 96e8e1d84170b33efc999b3e76be3abbd7978acf
# Parent  b41af984adfae8cbfe50bb6571f9057438ba8a20
(unidata-get-decomposition): Adjust Hangle decomposition rule to
Unicode.

diff -r b41af984adfa -r 96e8e1d84170 admin/unidata/unidata-gen.el
--- a/admin/unidata/unidata-gen.el	Fri Apr 17 02:31:20 2009 +0000
+++ b/admin/unidata/unidata-gen.el	Fri Apr 17 02:35:52 2009 +0000
@@ -828,11 +828,13 @@
 	  (L (+ #x1100 (/ char 588)))
 	  ;; V = VBase + (SIndex % NCount) * TCount
 	  (V (+ #x1161 (/ (% char 588) 28)))
+	  ;; LV = SBase + (SIndex / NCount) * NCount
+	  (LV (+ #xAC00 (* (/ char 588) 588)))
 	  ;; T = TBase + SIndex % TCount
 	  (T (+ #x11A7 (% char 28))))
       (if (= T #x11A7)
 	  (list L V)
-	(list L V T))))
+	(list LV T))))
 
    ))