diff --git a/tools/test-scripts.lisp b/tools/test-scripts.lisp index b5b32342e8703610cc175ec30d51770861454cb9..3e500049779b96ab057b9c3eb794e803f70885b5 100644 --- a/tools/test-scripts.lisp +++ b/tools/test-scripts.lisp @@ -40,10 +40,11 @@ Use the preferred lisp implementation" (test-fail 0) (failed-list ()))) (call-without-stopping - `(,(lambda() (run-test-lisp - "compiling ASDF" - '((load "test/script-support.lisp") (asdf-test::compile-asdf-script)) - :lisp lisp :log log)) + `(,(lambda () + (run-test-lisp + "compiling ASDF" + '((load "test/script-support.lisp") (asdf-test::compile-asdf-script)) + :lisp lisp :log log)) ,@(mapcar (lambda (test-script) (lambda () diff --git a/tools/test-upgrade.lisp b/tools/test-upgrade.lisp index 670fe94734708d8f00fdffc79c0453ab4773dc25..48201f5dbe79b00a485b49ff6f92a02f035a5071 100644 --- a/tools/test-upgrade.lisp +++ b/tools/test-upgrade.lisp @@ -135,7 +135,7 @@ Use at a given tag, put it under build/asdf-${tag}.lisp" ((:xcl) (version<= "2.15" tag)) ;; all clear on these implementations - ((:allegro :lispworks :sbcl :scl) t)))) + ((:allegro :sbcl :scl) t)))) (deftestcmd test-upgrade (lisp upgrade-tags upgrade-methods) "run upgrade tests