Commit 868c69ff authored by Robert P. Goldman's avatar Robert P. Goldman
Browse files

Refined the tests for module dependencies.

Examining the new TRAVERSE method definition, it became clear to me that
the current method would not propagate the value of the *forcing* special
variable properly.  The modification to the test-module-depend.{script,asd}
verifies this bug.
parent 6361f807
......@@ -3,4 +3,9 @@
(:module "quux"
:pathname #p""
:depends-on ("file1")
:components ((:file "file2")))))
:components ((:file "file2")
(:module "file3mod"
:pathname #p""
((:file "file3")))))))
......@@ -23,6 +23,9 @@
(asdf::run-shell-command "touch file1.lisp")
(sleep 1)
(asdf:operate 'asdf:load-op 'test-module-depend)
(assert (> (file-write-date (asdf:compile-file-pathname* "file2")) before))))
(assert (> (file-write-date (asdf:compile-file-pathname* "file2")) before))
;; does this properly go to the second level?
(assert (> (file-write-date (asdf:compile-file-pathname* "file3")) before))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment