X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=sheep;a=blobdiff_plain;f=src%2Ftest%2Fmain.lisp;h=572636ef8441419a4781a0698a7c53ca35609e8b;hp=1b796f5ddd55b887eaab736690875f8fd5f18389;hb=1ba7b00;hpb=2a64bd94afaacb7033c39d264e3bf4a44280624f

diff --git a/src/test/main.lisp b/src/test/main.lisp
index 1b796f5..572636e 100644
--- a/src/test/main.lisp
+++ b/src/test/main.lisp
@@ -70,5 +70,6 @@
 
 (defsuccesstest :success1 "resources/success1.lisp" "resources/success1.md")
 (deffailuretest :emptydocs "resources/emptydocs.lisp"
- '((:failure "Package EMPTYDOCS has no documentation")
-   (:failure "Symbol NO-DOC-FUNC has no documentation")))
+ `((:failure :emptydocs "Package EMPTYDOCS has no documentation")
+   (:failure ,(intern "NO-DOC-CONDITION" :emptydocs) "Symbol NO-DOC-CONDITION has no documentation")
+   (:failure ,(intern "NO-DOC-FUNC" :emptydocs) "Symbol NO-DOC-FUNC has no documentation")))