branch: elpa/parseedn commit 2b28df1c3d117c852978e06da0c5721cbc90d6c2 Author: tmpUser2022 <98637343+tmpuser2...@users.noreply.github.com> Commit: GitHub <nore...@github.com>
Add empty hash test --- test/parseedn-test.el | 1 + 1 file changed, 1 insertion(+) diff --git a/test/parseedn-test.el b/test/parseedn-test.el index 49a3a66b2c..8d167d54a8 100644 --- a/test/parseedn-test.el +++ b/test/parseedn-test.el @@ -45,6 +45,7 @@ (should (equal (parseedn-print-str '(:a 1 :b (:c 3))) "{:a 1, :b {:c 3}}")) (should (equal (parseedn-print-str '(edn-tagged-literal unknown "data")) "#unknown \"data\"")) (should (equal (parseedn-print-str '(edn-tagged-literal unknown (edn-tagged-literal unknown "data"))) "#unknown #unknown \"data\"")) + (should (equal (parseedn-print-str #s(hash-table size 0 data ())) "{}")) (should (listp (member (parseedn-print-str (let ((ht (make-hash-table))) (puthash :a 1 ht)