diff --git a/Makefile b/Makefile
index d4815b62a1b913f9a53d21869adceb994e2f2f3c..386a11322a297802ba6cc77c94afb871dcf573d5 100644
--- a/Makefile
+++ b/Makefile
@@ -142,7 +142,7 @@ test-all-lisps:
 	done
 
 # test upgrade is a very long run... This does just the regression tests
-test-all-noupgrade:
+test-all-no-upgrade:
 	@for lisp in ${lisps} ; do \
 		${MAKE} test-lisp test-clean-load l=$$lisp || exit 1 ; \
 	done
@@ -196,7 +196,7 @@ release: TODO test-all test-on-other-machines-too debian-changelog debian-packag
 
 .PHONY: install archive archive-copy push doc website clean mrproper \
 	test-forward-references test test-lisp test-upgrade test-forward-references \
-	test-all test-all-lisps test-all-noupgrade \
+	test-all test-all-lisps test-all-no-upgrade \
 	debian-package release \
 	replace-sbcl-asdf replace-ccl-asdf \
 	fix-local-git-tags fix-remote-git-tags wc wc-driver wc-asdf
diff --git a/test/test-deferred-warnings.script b/test/test-deferred-warnings.script
index 97672af1913d7e0db82f3b4713d37563a9ebf616..70f52226b06a2cf7fac7d6abbfcdbbc789cd91b0 100644
--- a/test/test-deferred-warnings.script
+++ b/test/test-deferred-warnings.script
@@ -56,7 +56,7 @@
      nil)))
 
 (unless *warnings-file-type*
-  (leave-test 0 "Your Lisp does not support deferred-warnings"))
+  (leave-test "Your Lisp does not support deferred-warnings" 0))
 
 (assert
  (handler-case
diff --git a/test/use-foo.lisp b/test/use-foo.lisp
index 3c91622b90546254e65d1790f4936c259838318f..824c562d7b932c1f361960551f95ba71421fe6f8 100644
--- a/test/use-foo.lisp
+++ b/test/use-foo.lisp
@@ -2,3 +2,6 @@
 
 (defun use-foo (x)
   (foo x))
+
+#+clisp (eval-when (:compile-toplevel :load-toplevel :execute)
+          (format t "~&~S~%" `(sys::*unknown-functions* ,sys::*unknown-functions*)))
diff --git a/test/use-setf-foo.lisp b/test/use-setf-foo.lisp
index 89737212d8e63a48713a76959f5138dd9803488a..0c2dc861d46ec6947dbc30948d5029e0da916a2c 100644
--- a/test/use-setf-foo.lisp
+++ b/test/use-setf-foo.lisp
@@ -2,3 +2,6 @@
 
 (defun use-setf-foo (v x)
   (setf (foo x) v))
+
+#+clisp (eval-when (:compile-toplevel :load-toplevel :execute)
+          (format t "~&~S~%" `(sys::*unknown-functions* ,sys::*unknown-functions*)))