<div dir="ltr"><br><div>In asdf-pathname-test.script, in function test-file, L126, changing:</div><div><br></div><div> :rename-and-delete</div><div><br></div><div>to:</div><div><br></div><div> #+(and sbcl os-windows) :rename-and-delete</div>
<div> #-(and sbcl os-windows) :supsersede</div><div><br></div><div>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. </div>
<div><br></div><div>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.</div><div><br></div><div><br></div><div><br></div></div>
<div class="gmail_extra"><br><br><div class="gmail_quote">On Tue, Oct 15, 2013 at 5:58 PM, Dave Cooper <span dir="ltr"><<a href="mailto:david.cooper@genworks.com" target="_blank">david.cooper@genworks.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><br><div>I can replicate this on Linux as well, with both mlisp and alisp. </div><div><br></div><div><br>
</div></div><div class="gmail_extra"><div><div class="h5"><br><br><div class="gmail_quote">On Tue, Oct 15, 2013 at 5:18 PM, Robert P. Goldman <span dir="ltr"><<a href="mailto:rpgoldman@sift.info" target="_blank">rpgoldman@sift.info</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">I pulled an update this afternoon, and now on ACL 9.0 on Mac OS X I get<br>
a failure on asdf-pathname-test.script<br>
<br>
I get an error as follows:<br>
<br>
Above backtrace due to this condition:<br>
attempt to take the length of a non-sequence: :UNSPECIFIC<br>
<br>
I get an enormous backtrace, but this is I think the direct call that<br>
gets an error:<br>
<br>
(LET<br>
<br>
((STREAM<br>
(OPEN<br>
. #16=((ASDF/COMPONENT:COMPONENT-PATHNAME<br>
ASDF-PATHNAME-TEST::FILE)<br>
:DIRECTION<br>
:OUTPUT<br>
:IF-EXISTS<br>
:RENAME-AND-DELETE<br>
:IF-DOES-NOT-EXIST<br>
:ERROR)))<br>
(#12=#:WITH-OPEN-FILE-ABORT-398 . #61=(T)))<br>
(UNWIND-PROTECT<br>
(MULTIPLE-VALUE-PROG1<br>
(PROGN . #17=((PRINT ASDF-PATHNAME-TEST::START-TIME STREAM) T))<br>
(SETQ #12# . #58=(NIL)))<br>
(WHEN (STREAMP STREAM) (CLOSE STREAM :ABORT #12#))))<br>
<br>
More as I find out more.<br>
<br>
Best,<br>
r<br>
<br>
</blockquote></div><br><br clear="all"><div><br></div></div></div><span class="HOEnZb"><font color="#888888">-- <br>My Best,<br><br>Dave Cooper, Genworks Support<br><a href="mailto:david.cooper@genworks.com" target="_blank">david.cooper@genworks.com</a>, <a href="http://dave.genworks.com" target="_blank">dave.genworks.com</a>(skype)<br>
USA: <a href="tel:248-327-3253" value="+12483273253" target="_blank">248-327-3253</a>(o), <a href="tel:1-248-330-2979" value="+12483302979" target="_blank">1-248-330-2979</a>(mobile)<br>UK: 0191 645 1699<br>
</font></span></div>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>My Best,<br><br>Dave Cooper, Genworks Support<br><a href="mailto:david.cooper@genworks.com">david.cooper@genworks.com</a>, <a href="http://dave.genworks.com">dave.genworks.com</a>(skype)<br>
USA: 248-327-3253(o), 1-248-330-2979(mobile)<br>UK: 0191 645 1699<br>
</div>