[elpa] externals/pyim 9c52fd9 2/2: Add pyim-test-pyim-imobjs and pyim-test-pyim-codes

[ELPA Syncer]

branch: externals/pyim
commit 9c52fd9eecd2729cfc85f5500cb61ea7ac4574ec
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    Add pyim-test-pyim-imobjs and pyim-test-pyim-codes
    
        * tests/pyim-tests.el (pyim-test-pyim-imobjs)
        (pyim-test-pyim-codes): New tests.
---
 tests/pyim-tests.el | 48 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)

diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index 2618d0d..fb1f6c9 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -166,6 +166,54 @@
   (should (equal (pyim-pinyin-build-regexp "ni-hao" t t)
                  "^ni-hao[a-z]*")))
 
+;; ** pyim-impobjs 相关单元测试
+(ert-deftest pyim-test-pyim-imobjs ()
+  (let ((pyim-pinyin-fuzzy-alist '(("en" "eng")
+                                   ("in" "ing")
+                                   ("un" "ong"))))
+    (should (equal (pyim-imobjs-create "nihao" 'quanpin)
+                   '((("n" "i" "n" "i") ("h" "ao" "h" "ao")))))
+    (should (equal (pyim-imobjs-create "nh" 'quanpin)
+                   '((("n" "" "n" "") ("h" nil "h" nil)))))
+    (should (equal (pyim-imobjs-create "xi'an" 'quanpin)
+                   '((("x" "i" "x" "i") ("'" "an" "'" "an")))))
+    (should (equal (pyim-imobjs-create "xian" 'quanpin)
+                   '((("x" "ian" "x" "ian")))))
+    (should (equal (pyim-imobjs-create "fenyun" 'quanpin)
+                   '((("f" "en" "f" "en") ("y" "un" "y" "un"))
+                     (("f" "en" "f" "en") ("y" "ong" "y" "un"))
+                     (("f" "eng" "f" "en") ("y" "un" "y" "un"))
+                     (("f" "eng" "f" "en") ("y" "ong" "y" "un")))))
+    (should (equal (pyim-imobjs-create "xian" 'wubi)
+                   '(("xian"))))
+    (should (equal (pyim-imobjs-create "xian" 'cangjie)
+                   '(("xian"))))
+    (should (equal (pyim-imobjs-create "nihc" 'pyim-shuangpin)
+                   '((("n" "i" "n" "i") ("h" "ao" "h" "c")))))))
+
+;; ** pyim-codes 相关单元测试
+(ert-deftest pyim-test-pyim-codes ()
+  (should (equal (pyim-codes-create
+                  (car (pyim-imobjs-create "nihao" 'quanpin))
+                  'quanpin)
+                 '("ni" "hao")))
+  (should (equal (pyim-codes-create
+                  (car (pyim-imobjs-create "aaaa" 'wubi))
+                  'wubi)
+                 '("wubi/aaaa")))
+  (should (equal (pyim-codes-create
+                  (car (pyim-imobjs-create "aaaa" 'wubi))
+                  'wubi 2)
+                 '("wubi/aa")))
+  (should (equal (pyim-codes-create
+                  (car (pyim-imobjs-create "aaaa" 'wubi))
+                  'wubi 1)
+                 '("wubi/a")))
+  (should (equal (pyim-codes-create
+                  (car (pyim-imobjs-create "aaaa" 'cangjie))
+                  'cangjie)
+                 '("cangjie/aaaa"))))
+
 ;; ** pyim-cstring 相关单元测试
 (ert-deftest pyim-test-pyim-cstring-partition ()
   (should (equal (pyim-cstring-partition "你好 hello 你好")