Raymond Toy pushed to branch master at cmucl / cmucl
Commits: 042d8a07 by Raymond Toy at 2016-12-01T19:55:02-08:00 Use lisp-unit::assert-true instead of cl:assert
Don't use cl:assert for the lisp-unit test; it should use lisp-unit assertions.
- - - - -
1 changed file:
- tests/issues.lisp
Changes:
===================================== tests/issues.lisp ===================================== --- a/tests/issues.lisp +++ b/tests/issues.lisp @@ -340,13 +340,13 @@ (if filename (push filename files) (push directory directories)))) - (assert (null (set-difference files - '("file" "link-to-dir" - "link-to-dir-in-dir" "link-to-file") - :test #'string-equal))) - (assert (null (set-difference directories - '(".dir" "dir") - :test #'string-equal))))) + (assert-true (null (set-difference files + '("file" "link-to-dir" + "link-to-dir-in-dir" "link-to-file") + :test #'string-equal))) + (assert-true (null (set-difference directories + '(".dir" "dir") + :test #'string-equal)))))
(define-test issue.36 (:tag :issues)
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/042d8a077f6193faa67b0536f9...