[asdf-devel] MCL issue

[Sam Steingold]

> * Robert Goldman <ectbyqzna-+oH95RRTAwguy2c70OcIdD at choyvp.tznar.bet> [2011-05-19 14:26:19 -0500]:
> Every time I have used logical pathnames, or even just used pathnames,
> they have blown up in my face, sooner or later, when code moved from
> one lisp implementation to another.

with all due respect, I am not sure I agree both with your experience
(pathnames are non-trivial to use, but quite powerful and useful) and
conclusions.

> I, for one, welcome Fare replacing them inside ASDF2...

I, for one, am severely disappointed with the size of asdf.
Now that you told me that Fare reimplemented pathnames, I am starting to
understand why.
A brief look at asdf.lisp appalled me.
I even tried to simplify it a little bit, e.g.:

diff -r 0195ae274543 modules/asdf/asdf.lisp
--- a/modules/asdf/asdf.lisp	Fri May 20 15:45:46 2011 -0400
+++ b/modules/asdf/asdf.lisp	Fri May 20 16:40:47 2011 -0400
@@ -387,6 +387,8 @@ a list for each collection, in order.
              \(foo \(first x\)\)
              \(bar \(second x\)\)\)\)
 Returns two values: \(A B C\) and \(1 2 3\)."
+  #+clisp `(ext:with-collect ,collectors . ,body)
+  #-clisp
   (let ((vars (mapcar #'(lambda (x) (gensym (symbol-name x))) collectors))
         (initial-values (mapcar (constantly nil) collectors)))
     `(let ,(mapcar #'list vars initial-values)

but soon gave up.




-- 
Sam Steingold (http://sds.podval.org/) on CentOS release 5.6 (Final) X 11.0.60900031
http://thereligionofpeace.com http://openvotingconsortium.org
http://ffii.org http://www.PetitionOnline.com/tap12009/ http://truepeace.org
Diplomacy is the art of saying "nice doggy" until you can find a rock.