Commit 74c2f241 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Reindent test-xach-update-bug.script

parent f6ff069c
Loading
Loading
Loading
Loading
+46 −46
Original line number Diff line number Diff line
@@ -6,8 +6,9 @@

(defparameter foo :test-asdf-location-change)

(with-expected-failure (#+ecl (not (asdf:version-satisfies (lisp-implementation-version) "16"))
                        #-ecl nil)
#+ecl (unless (version-satisfies (lisp-implementation-version) "16")
        (leave-test "ECL only supports this test starting with 16.0.0" 0))

(DBG "load foo. Should load from xach-foo-1/")
(setf *central-registry* (list (subpathname *test-directory* "xach-foo-1/")))
(defparameter foo1 (find-system foo))
@@ -53,4 +54,3 @@
(load-system foo)
(assert (symbol-value (find-symbol* :loaded :second-version)))
(assert-equal 42 (symbol-call :second-version :wtf))
)