Posted on 2012-02-14 19:05
dennis 閱讀(3735)
評論(1) 編輯 收藏 所屬分類:
Clojure
Clojure的REPL非常方便，可以隨時隨地試驗你的想法，REPL是read-eval-print-loop的簡稱。默認clojure.contrib有帶一個shell腳本來啟動REPL，具體看
這里。你也可以用JLine來增強REPL：
java -cp "%CLOJURE_DIR%\jline-VERSION.jar;%CLOJURE_JAR%" jline.ConsoleRunner clojure.main
不過，其實你還可以用
rlwrap這個GNU庫來增強clojure REPL。使用它有如下好處：
1.Tab completion，使用tab做代碼提示。
2.括號匹配
3.歷史記錄，哪怕你重啟REPL
4.通過
.inputrc來綁定vi或者emacs
具體操作步驟如下：
1.首先，你需要在你的機器上安裝rlwrap，你可以通過apt或者port,homebrew等工具安裝或者自己下載安裝：
sudo port install rlwrap
2.在你的home目錄下創建一個clojure目錄作為clojure home，并拷貝clojure.jar進去：
mkdir ~/clojure
cp .m2/repository/org/clojure/clojure/1.3.0/clojure-1.3.0.jar ~/clojure/clojure.jar
我是從maven的本地倉庫里拷貝了clojure 1.3的jar包過去，重命名為clojure.jar
3.創建一個shell腳本名為clj，并放入你的path變量，腳本內容：
#!/bin/sh
breakchars="(){}[],^%$#@\"\";:''|\\"
CLOJURE_DIR=~/clojure
CLOJURE_JAR="$CLOJURE_DIR"/clojure.jar
JAVA_OPTS="-Xmx512m -XX:MaxPermSize=256m -XX:+UseConcMarkSweepGC -XX:+UseCMSCompactAtFullCollection -XX:+CMSClassUnloadingEnabled"
if [ $# -eq 0 ]; then
exec rlwrap --remember -c -b "$breakchars" \
-f "$HOME"/.clj_completions \
-t "Clojure REPL" \
-p red \
-H "$CLOJURE_DIR"/.repl_history -s 1000\
java "$JAVA_OPTS" -cp "$CLOJURE_JAR" clojure.main
else
exec java -cp "$CLOJURE_JAR" clojure.main $1 "$@"
fi
我們將命令歷史輸出到~/clojure/.repl_history文件中，并限制數目為1000。
4.clj腳本中通過-f選項指定了completions文件為~/.clj_completions，執行下列clojure程序生成此文件：
(def completions (keys (ns-publics (find-ns 'clojure.core))))
;(def completions (mapcat (comp keys ns-publics) (all-ns)))
(with-open [f (java.io.BufferedWriter. (java.io.FileWriter. (str (System/getenv "HOME") "/.clj_completions")))]
(.write f (apply str (interpose \newline completions))))
這個程序只生成clojure.core的completions文件，如果你想將所有ns都加入進去，注釋掉第一行，使用第二行程序。
5.最后，配置下~/.inputrc文件：
set editing-mode emacs
tab: complete
set completion-query-items 150
set completion-ignore-case on
set blink-matching-paren on
set bell-style visible
我綁定為emacs，你可以選擇vi。
6.一切搞定，接下來你可以敲入命令clj來使用rlwrap啟動clojure REPL了，可以用tab做代碼提示了，可以用Ctrl + r來搜索歷史命令，運行截圖：
參考：
http://en.wikibooks.org/wiki/Clojure_Programming/Getting_Started#Enhancing_Clojure_REPL_with_rlwrap轉載請注明出處：
http://www.aygfsteel.com/killme2008/archive/2012/02/14/369976.html