4

評価された Clojure 式の結果を、きれいに印刷された形式で Emacs バッファーに直接挿入したいと考えています。

たとえば、次のようなものがあります。

    ;; [emacs lisp]
    (insert (nrepl-dict-get (nrepl-sync-request:eval "(range 30)") "value"))

対象のバッファで、

    ;;=>
    (0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29)

以前は、Clojure にきれいに印刷してもらっていました。

(nrepl-dict-get
  (nrepl-sync-request:eval
    (format "(clojure.core/let [x %s] (with-out-str (clojure.pprint/pprint x)))"
            "(range 30)"))
  "value")
;;=>
"(0\n 1\n 2\n 3\n 4\n 5\n 6\n 7\n 8\n 9\n 10\n 11\n 12\n 13\n 14\n 15\n 16\n 17\n 18\n 19\n 20\n 21\n 22\n 23\n 24\n 25\n 26\n 27\n 28\n 29)\n"

ただし、"and\nはエスケープされて挿入されています。エスケープせずに挿入したい。言い換えれば、引用符や改行をエスケープせずに、きれいに印刷された結果を直接挿入したいのです。これは以前のバージョンの Cider およびcider-nrepl.

4

2 に答える 2

2

ラッピング：

(nrepl-dict-get
  (nrepl-sync-request:eval
    (format "(clojure.core/let [x %s] (with-out-str (clojure.pprint/pprint x)))"
            "(range 30)"))
  "value")

でreadこれを解決する必要があります。

于 2014-11-25T05:35:34.727 に答える
1

私はこの機能をlispyに追加しました (これは Clojure の eval に Cider を使用する Paredit スタイルのパッケージです ) 2E: E

以下に例を示します (|はポイントを表します)。

|(for [x (range 8)] (range x))

後E:

|(for [x (range 8)] (range x))
(() (0) (0 1) (0 1 2) (0 1 2 3) (0 1 2 3 4) (0 1 2 3 4 5) (0 1 2 3 4 5 6))

後2E:

|(for [x (range 8)] (range x))
(()
 (0)
 (0 1)
 (0 1 2)
 (0 1 2 3)
 (0 1 2 3 4)
 (0 1 2 3 4 5)
 (0 1 2 3 4 5 6))

もちろんEjM、同じことを達成するためにまだ行うことができます：

(for [x (range 8)] (range x))
|(()
 (0)
 (0 1)
 (0 1 2)
 (0 1 2 3)
 (0 1 2 3 4)
 (0 1 2 3 4 5)
 (0 1 2 3 4 5 6))
于 2014-11-25T11:47:57.867 に答える