Skip to content

Instantly share code, notes, and snippets.

@jacktasia

jacktasia/test.clj

Created October 25, 2013 22:00
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jacktasia/7162485 to your computer and use it in GitHub Desktop.
Save jacktasia/7162485 to your computer and use it in GitHub Desktop.
Download ZIP
Pretty print clojure code
Raw
test.clj
(use 'clojure.pprint)
(require ' [clojure.edn :as edn])
(let [file-contents (slurp "clojure_test2.clj")
process-file (with-out-str
(clojure.pprint/write
(edn/read-string (str "[" file-contents "]"))
:dispatch
clojure.pprint/code-dispatch))]
(println (subs process-file 1 (- (.length process-file) 1))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment