2010-02-06 16:49:53 +00:00
|
|
|
(ns koans.path-to-enlightenment
|
|
|
|
|
(:use clojure.test))
|
2010-01-24 03:28:43 +00:00
|
|
|
|
2010-02-06 16:49:53 +00:00
|
|
|
(def __ nil)
|
2010-01-24 03:28:43 +00:00
|
|
|
|
2010-02-06 16:49:53 +00:00
|
|
|
(defmacro meditations [& forms]
|
|
|
|
|
(let [pairs (partition 2 forms)]
|
|
|
|
|
`(do
|
|
|
|
|
~@(doall (map
|
|
|
|
|
(fn [[doc# code#]]
|
|
|
|
|
`(when-not (is ~code# ~doc#)
|
|
|
|
|
(System/exit 1)))
|
|
|
|
|
pairs)))))
|
2010-02-05 18:57:38 +00:00
|
|
|
|
2010-02-06 22:00:08 +00:00
|
|
|
(load "about_equalities")
|
|
|
|
|
(load "about_vectors")
|
2010-02-06 23:43:06 +00:00
|
|
|
(load "about_sets")
|
2010-02-08 04:29:31 +00:00
|
|
|
(load "about_maps")
|
2010-02-09 04:57:08 +00:00
|
|
|
(load "about_functions")
|
2010-02-09 23:37:22 +00:00
|
|
|
(load "about_conditionals")
|
2010-02-11 04:13:55 +00:00
|
|
|
(load "about_higher_order_functions")
|
2010-02-08 04:29:31 +00:00
|
|
|
(println "You have acheived clojure enlightenment. Namaste.")
|
