io.encodings.{asian, korean} updates: i.e.asian docs...

basis/io/encodings/asian/asian-docs.factor

@@ -0,0 +1,8 @@
+USING: help.syntax help.markup strings ;
+IN: io.encodings.asian
+
+ABOUT: "io.encodings.asian"
+
+ARTICLE: "io.encodings.asian" "Asian Unicode Code Table Vocab"
+"The " { $vocab-link "io.encodings.asian" } " vocabulary provides words for loading, parsing and convert native code to Unicode, or vice versa with loaded coda tables. Any encodings have such code table data, can easily implemented using this vocabulary." $nl
+;

basis/io/encodings/asian/asian-tests.factor

@@ -0,0 +1,23 @@
+! Copyright (C) 2009 Yun, Jonghyouk.
+! See http://factorcode.org/license.txt for BSD license.
+USING: io.encodings.asian tools.test memoize ;
+IN: io.encodings.asian.tests
+
+
+MEMO: <test1> ( -- code-table )
+    "vocab:io/encodings/asian/data/test1.txt" <code-table>* ;
+
+
+[ 0 ] [ 0 <test1> n>u ] unit-test
+[ 0 ] [ 0 <test1> u>n ] unit-test
+
+[ 3 ] [ 3 <test1> n>u ] unit-test
+[ 3 ] [ 3 <test1> u>n ] unit-test
+
+[ HEX: AD2A ] [ HEX: 8253 <test1> n>u ] unit-test
+[ HEX: 8253 ] [ HEX: AD2A <test1> u>n ] unit-test
+
+[ HEX: AD31 ] [ HEX: 8258 <test1> n>u ] unit-test
+[ HEX: 8258 ] [ HEX: AD31 <test1> u>n ] unit-test
+
+

basis/io/encodings/asian/data/test1.txt

@@ -0,0 +1,15 @@
+#
+#    Name:     cp949 to Unicode table (for testing, partial)
+#
+0x00	0x0000	#NULL
+0x01	0x0001	#START OF HEADING
+0x02	0x0002	#START OF TEXT
+0x03	0x0003	#END OF TEXT
+0x04	0x0004	#END OF TRANSMISSION
+0x8253	0xAD2A	#HANGUL SYLLABLE KIYEOK WAE PIEUPSIOS
+0x8254	0xAD2B	#HANGUL SYLLABLE KIYEOK WAE SIOS
+0x8255	0xAD2E	#HANGUL SYLLABLE KIYEOK WAE CIEUC
+0x8256	0xAD2F	#HANGUL SYLLABLE KIYEOK WAE CHIEUCH
+0x8257	0xAD30	#HANGUL SYLLABLE KIYEOK WAE KHIEUKH
+0x8258	0xAD31	#HANGUL SYLLABLE KIYEOK WAE THIEUTH
+0x8259	0xAD32	#HANGUL SYLLABLE KIYEOK WAE PHIEUPH

basis/io/encodings/asian/summary.txt

@@ -0,0 +1 @@
+Asian Native <-> Unicode Code Table Loader

basis/io/encodings/asian/tags.txt

@@ -0,0 +1 @@
+text asian encodings

basis/io/encodings/korean/tags.txt

@@ -0,0 +1 @@
+text korean encodings