RosettaCodeData/Task/Word-wrap/Clojure/word-wrap-3.clj

mirror of https://github.com/acmeism/RosettaCodeData.git
;; cl-format based version
(defn wrap-line [size text]
  (clojure.pprint/cl-format nil (str "~{~<~%~1," size ":;~A~> ~}") (clojure.string/split text #" ")))
	`;; cl-format based version`
	`(defn wrap-line [size text]`
	`(clojure.pprint/cl-format nil (str "~{~<~%~1," size ":;~A~> ~}") (clojure.string/split text #" ")))`