Who needs conditionals in Clojure?

unconditional.clj

(defn- truth     [then else] (then))
(defn- falsehood [then else] (else))

(def boolness {false falsehood nil falsehood})

(defn if* [condition then-fn else-fn]
  ((get boolness condition truth) then-fn else-fn))

(defmacro my-if [test then else]
  `(if* ~test (fn [] ~then) (fn [] ~else)))