;;AUTOLOAD: unless
;;AUTODOC: unless "execute statements on condition"
;;(unless <condition> statements...)
;;
;;is equivalent to (if (not <condition>) (progn statements...))

(defmacrod unless (condition &rest statements)
  `(if (not ,condition) (progn ,@statements))
)
