Tests more about Japanese

t-sin · Jan 7, 2018 · a10a565 · a10a565
1 parent b4a90db
commit a10a565
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/t/encoding.lisp b/t/encoding.lisp
@@ -89,7 +89,14 @@
   (test-enc "t/data/unicode/utf-8.txt" :jp :utf-8)
   (test-enc "t/data/unicode/ucs2be.txt" :jp :ucs-2be)
   (test-enc "t/data/unicode/ucs2le.txt" :jp :ucs-2le)
-  (test-enc "t/data/unicode/utf-16.txt" :jp :utf-16))
+  (test-enc "t/data/unicode/utf-16.txt" :jp :utf-16)
+
+  (subtest "Kojiki"
+    (test-enc "t/data/ja/kojiki/03gendaigoyaku_kojiki.txt.eucjp" :jp :euc-jp)
+    (test-enc "t/data/ja/kojiki/03gendaigoyaku_kojiki.txt.jis" :jp :iso-2022-jp)
+    (test-enc "t/data/ja/kojiki/03gendaigoyaku_kojiki.txt.sjis" :jp :cp932)
+    (test-enc "t/data/ja/kojiki/03gendaigoyaku_kojiki.txt.utf8" :jp :utf-8)
+    (test-enc "t/data/ja/kojiki/03gendaigoyaku_kojiki.txt.utf16" :jp :utf-16)))
 
 (subtest "encoding -- tw"
   (test-enc "t/data/ascii/empty.txt" :tw :utf-8)