diff --git a/find-system.lisp b/find-system.lisp index e754c991bfb10447b5e1d678b2366a2e11805342..084d133fa2f1977364d64f68c427fc55882b614f 100644 --- a/find-system.lisp +++ b/find-system.lisp @@ -127,7 +127,7 @@ or NIL if not found." (defvar *preloaded-systems* (make-hash-table :test 'equal) "Registration table for preloaded systems.") - (declaim (ftype (function (component) t) mark-component-preloaded)) ; defined in asdf/operate + (declaim (ftype (function (t) t) mark-component-preloaded)) ; defined in asdf/operate (defun make-preloaded-system (name keys) "Make a preloaded system of given NAME with build information from KEYS"