[Openmcl-devel] Weird ASDF problem

Robert Goldman rpgoldman at sift.info
Sun Sep 12 01:48:43 UTC 2010


On 9/11/10 Sep 11 -1:53 PM, Ron Garret wrote:
> 
> On Sep 11, 2010, at 11:42 AM, Ron Garret wrote:
> 
>> I would suggest replacing (truename #p"ccl:") in wrapping-output-translations with (let ((*default-pathname-defaults* nil)) (truename "ccl:"))
> 
> That should be:
> 
> (let ((*default-pathname-defaults* #P"")) ...
> 
> not NIL.
> 
> I found that just putting this in my ccl-init.lisp seems to be an adequate workaround:
> 
> (let ((*default-pathname-defaults* #P"")) (asdf::initialize-output-translations))
> 
> rg
> 

Is there any reason we shouldn't replace

#+clozure (,(wilden (truename #p"ccl:")) ())

with

#+clozure (,(wilden (let ((*default-pathname-defaults* #P""))
                      (truename #p"ccl:"))) ())

in asdf.lisp?

If you think that's right, we could make that change.

It really would be best if you were to make a launchpad bug for this,
though, so that other developers would see this.  I'd be more confident
offering this as a patch if other ccl-using asdfers could see....

cheers,
r



More information about the Openmcl-devel mailing list