enhance: cut memory usage

This commit is contained in:
Tienson Qin
2022-01-19 00:24:36 +08:00
parent b0d77e5d7f
commit faea913a40
14 changed files with 216 additions and 305 deletions

View File

@@ -36,9 +36,10 @@
(defn default-config
([format]
(default-config format {:export-heading-to-list? false}))
([format {:keys [export-heading-to-list? export-keep-properties? export-md-indent-style export-md-remove-options]}]
([format {:keys [export-heading-to-list? export-keep-properties? export-md-indent-style export-md-remove-options parse_outline_only?]}]
(let [format (string/capitalize (name (or format :markdown)))]
(->> {:toc false
:parse_outline_only (or parse_outline_only? false)
:heading_number false
:keep_line_break true
:format format
@@ -198,28 +199,28 @@
[]))
(log/error :edn/wrong-content-type content)))
(defn ->edn-async
([content config]
(->edn-async nil content config))
([file content config]
(if util/node-test?
(p/resolved (->edn content config))
(try
(if (string/blank? content)
(p/resolved [])
(p/let [v (pool/add-parse-job! content config)]
(try
(-> v
(util/json->clj)
(update-src-full-content content)
(collect-page-properties))
(catch js/Error e
(println :parser/failed file)
(js/console.error e)
(p/resolved [])))))
(catch js/Error e
(log/error :parser/failed e)
(p/resolved []))))))
;; (defn ->edn-async
;; ([content config]
;; (->edn-async nil content config))
;; ([file content config]
;; (if util/node-test?
;; (p/resolved (->edn content config))
;; (try
;; (if (string/blank? content)
;; (p/resolved [])
;; (p/let [v (pool/add-parse-job! content config)]
;; (try
;; (-> v
;; (util/json->clj)
;; (update-src-full-content content)
;; (collect-page-properties))
;; (catch js/Error e
;; (println :parser/failed file)
;; (js/console.error e)
;; (p/resolved [])))))
;; (catch js/Error e
;; (log/error :parser/failed e)
;; (p/resolved []))))))
(defn opml->edn
[content]