[asdf-devel] Regression on Allegro Common Lisp

[Dave Cooper]

In asdf-pathname-test.script, in function test-file, L126, changing:

  :rename-and-delete

to:

  #+(and sbcl os-windows) :rename-and-delete
  #-(and sbcl os-windows) :supsersede

seems to resolve the issue. This :supersede was changed to
:rename-and-delete last night in order to make SBCL/Windows work.
Originally this was :supersede.

I don't know if this is a real solution or if we should look for a deeper
fix which allows leaving it unconditionally as :rename-and-delete.





On Tue, Oct 15, 2013 at 5:58 PM, Dave Cooper <david.cooper at genworks.com>wrote:

>
> I can replicate this on Linux as well, with both mlisp and alisp.
>
>
>
>
> On Tue, Oct 15, 2013 at 5:18 PM, Robert P. Goldman <rpgoldman at sift.info>wrote:
>
>> I pulled an update this afternoon, and now on ACL 9.0 on Mac OS X I get
>> a failure on  asdf-pathname-test.script
>>
>> I get an error as follows:
>>
>> Above backtrace due to this condition:
>> attempt to take the length of a non-sequence: :UNSPECIFIC
>>
>> I get an enormous backtrace, but this is I think the direct call that
>> gets an error:
>>
>> (LET
>>
>>     ((STREAM
>>       (OPEN
>>        . #16=((ASDF/COMPONENT:COMPONENT-PATHNAME
>>                ASDF-PATHNAME-TEST::FILE)
>>               :DIRECTION
>>               :OUTPUT
>>               :IF-EXISTS
>>               :RENAME-AND-DELETE
>>               :IF-DOES-NOT-EXIST
>>               :ERROR)))
>>      (#12=#:WITH-OPEN-FILE-ABORT-398 . #61=(T)))
>>     (UNWIND-PROTECT
>>      (MULTIPLE-VALUE-PROG1
>>       (PROGN . #17=((PRINT ASDF-PATHNAME-TEST::START-TIME STREAM) T))
>>       (SETQ #12# . #58=(NIL)))
>>      (WHEN (STREAMP STREAM) (CLOSE STREAM :ABORT #12#))))
>>
>> More as I find out more.
>>
>> Best,
>> r
>>
>>
>
>
> --
> My Best,
>
> Dave Cooper, Genworks Support
> david.cooper at genworks.com, dave.genworks.com(skype)
> USA: 248-327-3253(o), 1-248-330-2979(mobile)
> UK: 0191 645 1699
>



-- 
My Best,

Dave Cooper, Genworks Support
david.cooper at genworks.com, dave.genworks.com(skype)
USA: 248-327-3253(o), 1-248-330-2979(mobile)
UK: 0191 645 1699
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/asdf-devel/attachments/20131015/d62d596d/attachment.html>