anchor.diff:  			 ;; we can signal an error, or ignore this (signal a warning), as
   			 ;; the library version may be loadable from the user system repository
   			 ;; anyway (.i.e. Quicklisp)
  -			 (ecase *on-not-found-cld*
  -			   (:warn (warn "Couldn't find a cld for ~A" dependency))
  -			   (:error (error "Couldn't find a cld for ~A" dependency)))))
  +			 (ecase *solving-mode*
  +			   (:lenient (warn "Couldn't find a cld for ~A" dependency))
  +			   (:strict (error "Couldn't find a cld for ~A" dependency)))))
                                           ;else
                      (load-dependency-cld dependency cld)))))
       (loop for dependency in (dependencies library-version)
  
positive.code: 			 (calculate-library-versions dependency-library-version
  						     (cons dependency visited))))
                                          ;else
                   (warn "No ASDF system is being loaded by CLDM for ~A~%"
  		       dependency))))))
  
  (defun validate-library-versions-list (versions-list)
    (loop for i from 0 to (1- (length versions-list))
  
negative.code:                       (if (not (library-version dependency))
                            ;; No library version specified in the dependency
                            ;; Use the latest version
  			  (ecase *solving-mode*
  			    (:lenient
  			     (warn "Library version not specified for ~A. Calculating dependencies with the latest version!!" dependency)
  			     (first (library-versions library)))
  			    (:strict
  			     (error "Library version not specified for ~A." dependency)))
                            ;; else, use the library version specified
                            (find-cld-library-version
                             library
  