add plain render function
This commit is contained in:
parent
5bc8f1810c
commit
b9ebaf0ffe
|
@ -112,4 +112,9 @@
|
||||||
(fn [out c]
|
(fn [out c]
|
||||||
(render-char c flf out))
|
(render-char c flf out))
|
||||||
output
|
output
|
||||||
s)))
|
s)))
|
||||||
|
|
||||||
|
(defn render [^String s flf]
|
||||||
|
(->> (str/split s #"\n")
|
||||||
|
(map #(render-line % flf))
|
||||||
|
(apply concat)))
|
Loading…
Reference in a new issue