diff --git a/test/script-support.lisp b/test/script-support.lisp index c869f12ccd9242b4417365d965a565b743ce0273..16d835346e57d1d2721ef4958eeb66a650f9636f 100644 --- a/test/script-support.lisp +++ b/test/script-support.lisp @@ -402,7 +402,7 @@ is bound, write a message and exit on an error. If (good (key) (when (probe-file afasl) (delete-file afasl)) (rename-file tmp afasl) - compile-asdf key)) + key)) (cond ((null result) (bad :no-output))