2012-08-14 23:56:25 -04:00
|
|
|
(in-package :coleslaw-tests)
|
2013-04-21 14:27:08 -04:00
|
|
|
|
|
|
|
|
(defmacro deftest (name docstring &body body)
|
|
|
|
|
`(test ,name
|
|
|
|
|
,docstring
|
|
|
|
|
,@body))
|
|
|
|
|
|
|
|
|
|
(def-suite coleslaw-tests)
|
|
|
|
|
(in-suite coleslaw-tests)
|
|
|
|
|
|
|
|
|
|
(deftest sanity-test
|
|
|
|
|
"A blog should compile and deploy correctly."
|
2014-07-14 16:15:08 -04:00
|
|
|
(is (zerop (coleslaw:main ""))))
|
