simplifying meditations macro
This commit is contained in:
parent
896289b64e
commit
608690dca3
@ -6,11 +6,11 @@
|
|||||||
(defmacro meditations [& forms]
|
(defmacro meditations [& forms]
|
||||||
(let [pairs (partition 2 forms)]
|
(let [pairs (partition 2 forms)]
|
||||||
`(do
|
`(do
|
||||||
~@(doall (map
|
~@(map
|
||||||
(fn [[doc# code#]]
|
(fn [[doc# code#]]
|
||||||
`(when-not (is ~code# ~doc#)
|
`(when-not (is ~code# ~doc#)
|
||||||
(System/exit 0)))
|
(System/exit 0)))
|
||||||
pairs)))))
|
pairs))))
|
||||||
|
|
||||||
(load "about_equalities")
|
(load "about_equalities")
|
||||||
(load "about_lists")
|
(load "about_lists")
|
||||||
@ -22,4 +22,4 @@
|
|||||||
(load "about_higher_order_functions")
|
(load "about_higher_order_functions")
|
||||||
(load "about_runtime_polymorphism")
|
(load "about_runtime_polymorphism")
|
||||||
(load "about_sequence_comprehensions")
|
(load "about_sequence_comprehensions")
|
||||||
(println "You have acheived clojure enlightenment. Namaste.")
|
(println "You have achieved clojure enlightenment. Namaste.")
|
||||||
|
Loading…
Reference in New Issue
Block a user