Skip to content
Snippets Groups Projects
Commit a1493b94 authored by Robert P. Goldman's avatar Robert P. Goldman
Browse files

Short-circuit checking of NULL version specifications.

parent 7db34d29
No related branches found
No related tags found
No related merge requests found
......@@ -272,6 +272,11 @@ children.")))
;;;; version-satisfies
(with-upgradability ()
;; short-circuit testing of null version specifications.
;; this is an all-pass
(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))
(when version
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment