[asdf-install-devel] Patches - unit test improvements, clarifying refactorings

Dan Muller pikdj2002 at sneakemail.com
Thu Dec 27 00:27:56 UTC 2007


Gary King wrote:
> I've also altered the patch that mostly involved tab/space
> consistency. In the deftestsuite test-asdf-install (below), you had
> removed the (:setup ...) clause. I've put it back but will remove it
> if there is a reason for it being removed.
>
>> (deftestsuite test-asdf-install ()
>>   ()
>>   (:dynamic-variables
>>    (*locations*
>>     `((,(merge-pathnames (make-pathname :directory '(:relative
>> "site"))
>> 			 *working-directory*)
>> 	,(merge-pathnames (make-pathname :directory '(:relative "site- 
>> systems"))
>> 			  *working-directory*)
>> 	"temporary install")))
>>    (*preferred-location* "temporary install")
>>    (asdf-install::*private-asdf-install-dirs* "")
>>    (asdf:*central-registry*
>>     (list
>>      (merge-pathnames (make-pathname :directory '(:relative "site- 
>> systems"))
>> 		      *working-directory*))))
>>   (:setup
>>    (delete-directory-and-files *working-directory* :verbose? t
>> 			       :if-does-not-exist :ignore)
>>    (ensure-directories-exist *working-directory*)))
>

OK, I'm home now and have just taken time to look into this. I know
what happened, and it's not pretty. My working repository is based on
stable; that's all that was available when I started this work. But
unstable, which you made available later, has a bunch of additional
patches in it! And I didn't notice that until about three minutes
ago...

I hope that doesn't make my other patches too hard to apply! I'm going
to try merging unstable into (a copy of) my working repository.

-- 
Dan Muller



More information about the asdf-install-devel mailing list