clojure sublimeREPL 中的 pprint

Question

有没有办法在clojure sublimeREPL中使用pprint代替常规打印

目前我不得不像这样包装我的代码：

(clojure.pprint/pprint (for [i (range 10)] {i {:times2 (* i 2) :times3 (* i 3)}}))
=>    ({0 {:times2 0, :times3 0}}
       {1 {:times2 2, :times3 3}}
       {2 {:times2 4, :times3 6}}
       {3 {:times2 6, :times3 9}}
       {4 {:times2 8, :times3 12}}
       {5 {:times2 10, :times3 15}}
       {6 {:times2 12, :times3 18}}
       {7 {:times2 14, :times3 21}}
       {8 {:times2 16, :times3 24}}
       {9 {:times2 18, :times3 27}})

对不起，这个假的例子

Answer 1

你可以用简单的nrepl middleware来做，例如：

(defn pprint-middleware [h]
  (fn [{:keys [code op] :as msg}]
    (if (and (= op "eval") (not (empty? code)))
      (->> #(str "(clojure.pprint/pprint " % ")")
           (update-in msg [:code])
           h)
      (h msg))))

将它添加到您的 repl 的最简单方法是在您的 project.clj 中配置 repl-options：

:repl-options {:nrepl-middleware [nrepl.utils/pprint-middleware]})

这是完整的project.clj 示例：

(defproject sample "0.1.0"
  :dependencies [[org.clojure/clojure "1.4.0"]]
  :repl-options {:nrepl-middleware [sample.utils/pprint-middleware]})