X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=sheep;a=blobdiff_plain;f=src%2Ftest%2Fmain.lisp;h=572636ef8441419a4781a0698a7c53ca35609e8b;hp=a73dd7bac468278c8ede478c842736f19bdc24a6;hb=1ba7b00;hpb=e9d1b7da236295700286b7564960d84f9c5f0dbe diff --git a/src/test/main.lisp b/src/test/main.lisp index a73dd7b..572636e 100644 --- a/src/test/main.lisp +++ b/src/test/main.lisp @@ -70,6 +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-CONDITION 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")))