Jarkの使い方メモ ref: http://qiita.com/items/2108

file0.txt

/Users/yasuhisa/Dropbox/lda_clj% jark server start                                                     
java -Xms256m -Xmx512m -cp /Users/yasuhisa/.cljr/lib/jark-0.4-SNAPSHOT-clojure-1.3.0-standalone.jar clojure.tools.jark.server 9000 &
Started JVM on port 9000

file1.txt

/Users/yasuhisa/Dropbox/lda_clj% jark cp add lib                  
Added jar lib/cdt-1.2.6.2.jar
Added jar lib/clj-http-0.2.7.jar
Added jar lib/clj-stacktrace-0.2.4.jar
Added jar lib/clojure-1.2.0.jar
Added jar lib/clojure-contrib-1.2.0.jar
Added jar lib/commons-codec-1.5.jar
Added jar lib/commons-io-2.1.jar
Added jar lib/commons-logging-1.1.1.jar
Added jar lib/commons-math-2.2.jar
Added jar lib/data.json-0.1.1.jar
Added jar lib/debug-repl-0.3.1.jar
Added jar lib/httpclient-4.1.2.jar
Added jar lib/httpcore-4.1.2.jar
Added jar lib/httpmime-4.1.2.jar
Added jar lib/jark-0.4-20120206.025450-1.jar
Added jar lib/java.classpath-0.1.0.jar
Added jar lib/server-socket-1.0.0.jar
Added jar lib/slingshot-0.9.0.jar
Added jar lib/swank-clojure-1.4.0.jar
Added jar lib/tools.namespace-0.1.0.jar
Added jar lib/tools.nrepl-0.0.5.jar

file2.txt

jark -e '((load-file "src/lda_clj/core.clj") "--file" "tmp.txt" "--max-iter" "10")'             

file3.txt

(ns lda_clj.test.util
  (:use [lda_clj.util])
  (:use [clojure.test]))

file4.txt

jark -e '(use (quote clojure.test) (quote lda_clj.test.util) (run-all-tests #"lda_clj.test.*")'

file5.txt

/Users/yasuhisa/Dropbox/lda_clj% jark -e '
(use (quote clojure.test))
(use (quote clojure.contrib.string))

(let [my-package-name "lda_clj"]
  (dorun (map (fn [file-name]
        (->> file-name
             (clojure.contrib.string/split #"\\.")
             (first)
             (str my-package-name ".test.")
             (symbol)
             (use)))
          (.list (new java.io.File (str "test/" my-package-name "/test")))))
  (run-all-tests
   (->> ".test.*"
        (str my-package-name)
        (re-pattern))))
'