From 40020f7d2b278ebf35a0d576e07cc39667c08c0e Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau Date: Fri, 20 Oct 2017 14:20:32 -0400 Subject: [PATCH] Add upgrade test for UIOP issue that Xach found. UIOP 3.3.0 loaded on top of an earlier ASDF 3 would cause everything to be spuriously rebuilt, because of a change of representation of stamp< arguments. This test evidences the breakage, and the fix. --- test/script-support.lisp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/test/script-support.lisp b/test/script-support.lisp index 936055d7..e2b13096 100644 --- a/test/script-support.lisp +++ b/test/script-support.lisp @@ -687,6 +687,10 @@ is bound, write a message and exit on an error. If (format t "CR ~S~%" (symbol-value (asym :*central-registry*))) (format t "loading test-module-depend~%") (acall :oos (asym :load-op) :test-module-depend) + (assert-equal (asymval :*f2c* :test-package) 1) + (format t "loading test-module-depend again -- shouldn't rebuild anything~%") + (acall :oos (asym :load-op) :test-module-depend) + (assert-equal (asymval :*f2c* :test-package) 1) (format t "done loading~%")) (defun load-asdf (&optional tag) -- GitLab