;; unless.clj

(if (even? 1) "even" "odd")

(defmacro unless [pred then else]
  (list 'if (list 'not pred) then else))

(unless (even? 1) "odd" "even")

(defmacro unless-templating [pred then else]
  `(if (not ~pred) ~then ~else))

(unless-templating (even? 1) "odd" "even")