From 7e1d7ad01ee4af4b67b053cd7ffaafab846ea390 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Tue, 15 Apr 2014 23:05:56 -0400 Subject: [PATCH] Remove unnecessary (declare (ignorable ...)). --- component.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/component.lisp b/component.lisp index 39260794..2dec0edf 100644 --- a/component.lisp +++ b/component.lisp @@ -273,9 +273,8 @@ children."))) ;;;; version-satisfies (with-upgradability () ;; short-circuit testing of null version specifications. - ;; this is an all-pass + ;; this is an all-pass, without warning (defmethod version-satisfies :around ((c t) (version null)) - (declare (ignorable c version)) t) (defmethod version-satisfies ((c component) version) (unless (and version (slot-boundp c 'version) (component-version c)) -- GitLab