diff --git a/tools/test-scripts.lisp b/tools/test-scripts.lisp
index ef6c08f1b14808336ec8e8fdda70c58107745567..fbbbe4789b2e06ba13b52242b07fc4bad5a08033 100644
--- a/tools/test-scripts.lisp
+++ b/tools/test-scripts.lisp
@@ -82,6 +82,6 @@ Ran ~D tests, ~D passed, ~D failed~
 (deftestcmd %test (lisp test-scripts)
   "run all normal tests but upgrade tests
 Use the preferred lisp implementation"
-  (all-pass (test-scripts lisp test-scripts) (doc) (test-clean-load lisp)))
+  (all-pass (doc) (test-clean-load lisp) (test-scripts lisp test-scripts)))
 
 (defalias %t %test)