+(deftest #P"resources/unmatchedending.lisp" :failure "Unmatched ending paren" 2 12)
+
+; This is not a check for actually validity, but rather that the check directory code
+; checks the directory.
+(push
+ (lambda ()
+ (let
+ ((*standard-output* (make-broadcast-stream))
+ (*error-output* (make-broadcast-stream)))
+ (wolf:pretty-print-check-directory #P"resources/dircheck"
+ :copyright-notice "; Copyright XXXX AGPL")
+ (wolf:pretty-print-check-directory #P"resources/dircheck"))
+ t)
+ *tests*)