From da56dd5ae0ccd14b7d8f72c70b27f94eb4ee767a Mon Sep 17 00:00:00 2001 From: Colin Jones Date: Thu, 16 Jun 2011 18:01:43 -0500 Subject: [PATCH] Improve docs and output about auto-runner --- README.md | 16 ++++++++++------ src/runner/freshness.clj | 2 +- 2 files changed, 11 insertions(+), 7 deletions(-) diff --git a/README.md b/README.md index e7077b8..127011f 100644 --- a/README.md +++ b/README.md @@ -47,12 +47,16 @@ To run the koans, simply run `script\run` on Windows +It's an auto-runner, so as you save your files with the correct answers, it will +advance you to the next koan or file. + You'll see something like this: - FAIL in clojure.lang.PersistentList$EmptyList@1 (equalities.clj:1) + Problem in /home/colin/Projects/clojure-koans/src/koans/equalities.clj + --------------------- + Assertion failed! We shall contemplate truth by testing reality, via equality. - expected: (= __ true) - actual: (not (= :fill-in-the-blank true)) + (= __ true) The output is telling you that you have a failing test in equalities.clj. So open that file up and make it pass! In general, you just fill in the @@ -64,9 +68,9 @@ so you'll have to pay close attention to the failure messages, because up until the very end, making a test pass just means that the next failure message comes up. -While it's very easy (especially at first) to just fill in the blanks making -things pass, you should work slowly, making sure you understand why the answer -is what it is. Enjoy your path to Clojure enlightenment! +While it might be easy (especially at first) to just fill in the blanks making +things pass, you should work thoughtfully, making sure you understand why the +answer is what it is. Enjoy your path to Clojure enlightenment! ### Trying more things out diff --git a/src/runner/freshness.clj b/src/runner/freshness.clj index 3a4b9a5..33bf432 100644 --- a/src/runner/freshness.clj +++ b/src/runner/freshness.clj @@ -17,7 +17,6 @@ (let [these-koans (filter (among-paths? refreshed-files) (ordered-koan-paths))] - (println "Refreshing:" these-koans) (when (every? tests-pass? these-koans) (if-let [next-koan-file (file (next-koan-path (last these-koans)))] (report-refresh {:reloaded [next-koan-file]}) @@ -30,5 +29,6 @@ (def scheduler (ScheduledThreadPoolExecutor. 1)) (defn setup-freshener [] + (println "Starting auto-runner...") (.scheduleWithFixedDelay scheduler refresh! 0 500 TimeUnit/MILLISECONDS) (.awaitTermination scheduler Long/MAX_VALUE TimeUnit/SECONDS))