GitLab

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.

        (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)

Raymond Toy pushed to branch master at cmucl / cmucl

Commits:

1 changed file:

Changes: