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

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""
:components
((: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))
))
Markdown is supported
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