parser.cljs 762 B

12345678910111213141516171819202122232425262728
  1. (ns frontend.parser
  2. (:require [cljs.test :refer [is deftest]]
  3. [frontend.format.mldoc :as mldoc :refer [->edn]]))
  4. (def md-config (mldoc/default-config :markdown))
  5. (deftest src-test
  6. (is (=
  7. (first (->edn "```
  8. : hello
  9. ```" md-config))
  10. [["Src"
  11. {:lines [": hello" "\n"],
  12. :pos_meta {:start_pos 4, :end_pos 12},
  13. :full_content "```\n: hello\n```"}]
  14. {:start_pos 0, :end_pos 15}])))
  15. (deftest name-definition-test
  16. (is (=
  17. (first (->edn "term
  18. : definition" md-config))
  19. [["List"
  20. [{:content [["Paragraph" [["Plain" "definition"]]]],
  21. :items [],
  22. :name [["Plain" "term"]],
  23. :indent 0,
  24. :ordered false}]]
  25. {:start_pos 0, :end_pos 17}])))