Commit c421f582 authored by Robert Goldman's avatar Robert Goldman
Browse files

Suppress empty arguments in results of DEFTESTCMD.

parent 13d20382
......@@ -144,7 +144,8 @@ and which systems to test loading with ASDF_TEST_SYSTEMS or s=
(multiple-value-bind (decl body) (decl-and-body decl-and-body)
`(defun ,name (&optional ,@largs)
`(defun ,name ,@(if largs `((&optional ,@largs))
(list nil))
(with-failure-context (:name ,(command-name name))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment