Improve docstring on slurp-rime

main
Eric Ihli 3 years ago
parent e6481308cc
commit 9d547a2733

@ -33,7 +33,8 @@
(> (sonority a) (sonority b))) (> (sonority a) (sonority b)))
(defn slurp-rime (defn slurp-rime
"Returns a vector of the rime and the remaining phones to process." "Expects the phones in reverse order.
Returns a vector of the rime (in forwards order) and the remaining phones to process."
[phones] [phones]
(let [splits (util/take-through vowel? phones)] (let [splits (util/take-through vowel? phones)]
[(vec (reverse (first splits))) (vec (flatten (rest splits)))])) [(vec (reverse (first splits))) (vec (flatten (rest splits)))]))

Loading…
Cancel
Save