<div dir="ltr"><div class="gmail_extra"><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><br>
With luck, Dave's Windows tests will come back passing, and we can<br>
release tomorrow.<br></blockquote><div><br></div><div><br></div><div>Not quite. The next failure looks like it's specific to cygwin, though. At least in Allegro and CCL, when launched from a cygwin bash shell, the "PWD" environment is "/cygdrive/f/..." but this is not recognized by the Lisp -- e.g. </div><div><br></div><div> (probe-file (uiop:getenv "PWD")) --> NIL</div><div><br></div><div>Should this be considered a bug with the environment, because a Unix-style PWD is being passed into a program which is not guaranteed to understand Unix-style pathnames? </div><div><br></div><div><br></div></div><div class="gmail_extra">
<p class="">; Loading F:\cl\tests\asdf\asdf-windows\test\script-support.lisp</p><p class="">; Fast loading F:\cl\tests\asdf\asdf-windows\build\fasls\alisp\asdf.fasl</p><p class="">Configuring ASDF</p><p class="">Enabling debugging</p><p class="">Being a bit verbose</p><p class="">Comparing directories</p><p class="">ASDF-TEST:*TEST-DIRECTORY* and</p><p class=""> (:PATHNAME-DIRECTORY-PATHNAME (NTH-VALUE 2 (:LOCATE-SYSTEM :TEST-ASDF))) both evaluate to same path:</p><p class=""> #P"F:\\cl\\tests\\asdf\\asdf-windows\\test\\"</p><p class="">Frob packages</p><p class="">Running test-encodings.script with acl-9.0-win-x86</p><p class="">; Loading F:\cl\tests\asdf\asdf-windows\test\test-encodings.script</p><p class="">Test TEST-ENCODING-EXPLICIT-U8: should be UTF-8</p><p class="">; Registering #<SYSTEM "test-encoding-explicit-u8"></p><p class="">; Loading F:\cl\tests\asdf\asdf-windows\test\lambda.lisp</p><p class="">TEST ABORTED: illegal namestring: "/cygdrive/f/cl/tests/asdf/asdf-windows/:/cygdrive/f/cl/tests/asdf/asdf-windows/uiop/:/cygdrive/f/cl/tests/asdf/asdf-windows/ext//:" [6]</p><p class="">Evaluation stack:</p><p class=""><br></p><p class=""> ->(TPL::ZOOM-COMMAND :FROM-READ-EVAL-PRINT-LOOP NIL :COUNT 69 :ALL T)</p><p class=""> (SYS::..RUNTIME-OPERATION "applyn" . #1=(:UNKNOWN-ARGS))</p><p class=""> (TPL:DO-COMMAND</p><p class=""><br></p><p class=""> "zoom"</p><p class=""> :FROM-READ-EVAL-PRINT-LOOP</p><p class=""> NIL</p><p class=""> :COUNT</p><p class=""> 69</p><p class=""> :ALL</p><p class=""> T)</p><p class=""> (ASDF/IMAGE:RAW-PRINT-BACKTRACE</p><p class=""><br></p><p class=""> :STREAM</p><p class=""> #2=#<EXCL:TERMINAL-SIMPLE-STREAM</p><p class=""> [initial terminal io] fd 0/1</p><p class=""> @</p><p class=""> #x200fadea></p><p class=""> :COUNT</p><p class=""> 69</p><p class=""> :CONDITION</p><p class=""> #3=#<PARSE-ERROR @ #x205d490a>)</p><p class=""> (SYS::..RUNTIME-OPERATION #4="lisp_apply" . #1#)</p><p class=""> ((:INTERNAL ASDF/IMAGE:PRINT-BACKTRACE 0))</p><p class=""> (ASDF/STREAM:CALL-WITH-SAFE-IO-SYNTAX</p><p class=""><br></p><p class=""> #<Closure (:INTERNAL ASDF/IMAGE:PRINT-BACKTRACE 0) @ #x205d491a>)</p><p class=""> (ASDF/IMAGE:PRINT-BACKTRACE :STREAM #2# :COUNT 69 :CONDITION #3#)</p><p class=""> (ASDF/IMAGE:PRINT-CONDITION-BACKTRACE #3# :STREAM #2# :COUNT 69)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> [... EXCL::EVAL-AS-PROGN ]</p><p class=""> (BLOCK</p><p class=""><br></p><p class=""> ASDF-TEST:ACALL</p><p class=""> (APPLY</p><p class=""> (APPLY</p><p class=""> 'ASDF-TEST:ASYM</p><p class=""> (IF</p><p class=""> (CONSP ASDF-TEST::NAME)</p><p class=""> ASDF-TEST::NAME</p><p class=""> (LIST ASDF-TEST::NAME)))</p><p class=""> ASDF-TEST::ARGS))</p><p class=""> [... EXCL::%EVAL ]</p><p class=""> (ASDF-TEST:ACALL</p><p class=""><br></p><p class=""> :PRINT-CONDITION-BACKTRACE</p><p class=""> #3#</p><p class=""> :COUNT</p><p class=""> 69</p><p class=""> :STREAM</p><p class=""> #2#)</p><p class=""> (SYS::..RUNTIME-OPERATION</p><p class=""><br></p><p class=""> #8="_comp_to_interp"</p><p class=""> :PRINT-CONDITION-BACKTRACE</p><p class=""> #3#</p><p class=""> :COUNT</p><p class=""> 69</p><p class=""> :STREAM</p><p class=""> #2#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> [... EXCL::EVAL-AS-PROGN ]</p><p class=""> (LET*</p><p class=""><br></p><p class=""> . #6=(((#5=#:G245</p><p class=""> (CONS</p><p class=""> (LOAD-TIME-VALUE EXCL::.IGNORE-ERRORS-1.)</p><p class=""> (EXCL::FAST EXCL::*HANDLER-CLUSTERS*)))</p><p class=""> (EXCL::*HANDLER-CLUSTERS* #5#))</p><p class=""> (DECLARE (DYNAMIC-EXTENT #5# EXCL::*HANDLER-CLUSTERS*))</p><p class=""> (PROGN</p><p class=""> . #7=((ASDF-TEST:ACALL</p><p class=""> :PRINT-CONDITION-BACKTRACE</p><p class=""> ASDF-TEST::C</p><p class=""> :COUNT</p><p class=""> 69</p><p class=""> :STREAM</p><p class=""> *ERROR-OUTPUT*)))))</p><p class=""> [... EXCL::EVAL-AS-PROGN ]</p><p class=""> (CATCH 'EXCL::IGNORE-ERRORS-1 (LET* . #6#))</p><p class=""> [... EXCL::%EVAL ]</p><p class=""> (EXCL::EVAL-AS-PROGN</p><p class=""><br></p><p class=""> ((IGNORE-ERRORS . #7#) (ASDF-TEST:LEAVE-TEST "Script failed" 1)))</p><p class=""> [... EXCL::%EVAL ]</p><p class=""> ((:INTERNAL ASDF-TEST::CALL-WITH-TEST) #3#)</p><p class=""> (SYS::..RUNTIME-OPERATION #8# #3#)</p><p class=""> (SIGNAL #3#)</p><p class=""> (ERROR</p><p class=""><br></p><p class=""> PARSE-ERROR</p><p class=""> :FORMAT-CONTROL</p><p class=""> #9="illegal namestring: ~s [~d]"</p><p class=""> :FORMAT-ARGUMENTS</p><p class=""> #10=("/cygdrive/f/cl/tests/asdf/asdf-windows/:/cygdrive/f/cl/tests/asdf/asdf-windows/uiop/:/cygdrive/f/cl/tests/asdf/asdf-windows/ext//:"</p><p class=""> 6))</p><p class=""> (EXCL::.PARSE-ERROR #9# . #10#)</p><p class=""> ((FLET EXCL::PARSE-DOS-NAMESTRING EXCL::FAILURE) 6)</p><p class=""> (EXCL::PARSE-DOS-NAMESTRINGu</p><p class=""><br></p><p class=""> #11="/cygdrive/f/cl/tests/asdf/asdf-windows/:/cygdrive/f/cl/tests/asdf/asdf-windows/uiop/:/cygdrive/f/cl/tests/asdf/asdf-windows/ext//:"</p><p class=""> NIL</p><p class=""> #P""</p><p class=""> 0</p><p class=""> NIL</p><p class=""> NIL)</p><p class=""> (PARSE-NAMESTRING #11#)</p><p class=""> (PATHNAME #11#)</p><p class=""> (ASDF/PATHNAME:ABSOLUTE-PATHNAME-P #11#)</p><p class=""> ((FLET</p><p class=""> ASDF/SOURCE-REGISTRY:PARSE-SOURCE-REGISTRY-STRING</p><p class=""> ASDF/SOURCE-REGISTRY::CHECK)</p><p class=""><br></p><p class=""> #11#)</p><p class=""> (ASDF/SOURCE-REGISTRY:PARSE-SOURCE-REGISTRY-STRING</p><p class=""><br></p><p class=""> #12="/cygdrive/f/cl/tests/asdf/asdf-windows/:/cygdrive/f/cl/tests/asdf/asdf-windows/uiop/:/cygdrive/f/cl/tests/asdf/asdf-windows/ext//:")</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #17=(STRING))</p><p class=""><br></p><p class=""> #12#</p><p class=""> :INHERIT</p><p class=""> #13=(ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY</p><p class=""> ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY</p><p class=""> ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY</p><p class=""> ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY</p><p class=""> ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY</p><p class=""> ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY)</p><p class=""> :REGISTER</p><p class=""> #14=#<Closure (:INTERNAL</p><p class=""> ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY</p><p class=""> 0)</p><p class=""> @</p><p class=""> #x205d554a>)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> #12#</p><p class=""> :INHERIT</p><p class=""> #13#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #23=(SYMBOL))</p><p class=""><br></p><p class=""> ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY</p><p class=""> :INHERIT</p><p class=""> #13#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY</p><p class=""> :REGISTER</p><p class=""> #14#</p><p class=""> :INHERIT</p><p class=""> #13#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> (ASDF/SOURCE-REGISTRY::INHERIT-SOURCE-REGISTRY</p><p class=""><br></p><p class=""> #15=(ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY . #13#)</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-DIRECTIVE</p><p class=""><br></p><p class=""> :INHERIT-CONFIGURATION</p><p class=""> :INHERIT</p><p class=""> #15#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #21=(CONS))</p><p class=""><br></p><p class=""> #16=(:SOURCE-REGISTRY :INHERIT-CONFIGURATION)</p><p class=""> :INHERIT</p><p class=""> #15#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> #16#</p><p class=""> :INHERIT</p><p class=""> #15#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #17#)</p><p class=""><br></p><p class=""> #18=""</p><p class=""> :INHERIT</p><p class=""> #15#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> #18#</p><p class=""> :REGISTER</p><p class=""> #14#</p><p class=""> :INHERIT</p><p class=""> #15#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> (EXCL::CACHING-MISS</p><p class=""><br></p><p class=""> #24=#<STANDARD-GENERIC-FUNCTION</p><p class=""> ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY></p><p class=""> #19=(#18# :REGISTER #14# :INHERIT #15#)</p><p class=""> #(0</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> #25=#(32787053 T NIL NIL #<BUILT-IN-CLASS CONS> 0 NIL)</p><p class=""> #26=#<Closure (:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""> @</p><p class=""> #x204bf17a></p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> #(32124820 T NIL NIL #<BUILT-IN-CLASS SYMBOL> 0 NIL)</p><p class=""> #<Closure (:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""> @</p><p class=""> #x205d5712></p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL))</p><p class=""> ((:INTERNAL EXCL::UPDATE-TO-CACHING-DFUN 0) . #19#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> (ASDF/SOURCE-REGISTRY::INHERIT-SOURCE-REGISTRY</p><p class=""><br></p><p class=""> #20=(#18# . #15#)</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-DIRECTIVE</p><p class=""><br></p><p class=""> :INHERIT-CONFIGURATION</p><p class=""> :INHERIT</p><p class=""> #20#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #21#)</p><p class=""><br></p><p class=""> #22=(:SOURCE-REGISTRY :INHERIT-CONFIGURATION)</p><p class=""> :INHERIT</p><p class=""> #20#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> #22#</p><p class=""> :INHERIT</p><p class=""> #20#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> ((METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY #23#)</p><p class=""><br></p><p class=""> ASDF/SOURCE-REGISTRY:WRAPPING-SOURCE-REGISTRY</p><p class=""> :INHERIT</p><p class=""> #20#</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0)</p><p class=""><br></p><p class=""> ASDF/SOURCE-REGISTRY:WRAPPING-SOURCE-REGISTRY</p><p class=""> :REGISTER</p><p class=""> #14#</p><p class=""> :INHERIT</p><p class=""> #20#)</p><p class=""> (SYS::..RUNTIME-OPERATION #4# . #1#)</p><p class=""> (EXCL::CACHING-MISS</p><p class=""><br></p><p class=""> #24#</p><p class=""> #27=(ASDF/SOURCE-REGISTRY:WRAPPING-SOURCE-REGISTRY</p><p class=""> :REGISTER</p><p class=""> #14#</p><p class=""> :INHERIT</p><p class=""> #20#)</p><p class=""> #(0</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> #25#</p><p class=""> #26#</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL))</p><p class=""> ((:INTERNAL EXCL::UPDATE-TO-CACHING-DFUN 0) . #27#)</p><p class=""> [... ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY ]</p><p class=""> (ASDF/SOURCE-REGISTRY::INHERIT-SOURCE-REGISTRY</p><p class=""><br></p><p class=""> (ASDF/SOURCE-REGISTRY:WRAPPING-SOURCE-REGISTRY . #20#)</p><p class=""> :REGISTER</p><p class=""> #14#)</p><p class=""> (ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY #18#)</p><p class=""> (ASDF/SOURCE-REGISTRY:COMPUTE-SOURCE-REGISTRY #18#)</p><p class=""> (ASDF/FIND-SYSTEM:INITIALIZE-SOURCE-REGISTRY #18#)</p><p class=""> [... EXCL::%EVAL ]</p><p class=""> (EVAL</p><p class=""><br></p><p class=""> (UNLESS</p><p class=""> (ASDF/SYSTEM:FIND-SYSTEM :ASDF-ENCODINGS NIL)</p><p class=""> (ASDF/FIND-SYSTEM:INITIALIZE-SOURCE-REGISTRY #18#)))</p><p class=""> (EXCL::SLOLOAD</p><p class=""><br></p><p class=""> #28=#<EXCL:FILE-SIMPLE-STREAM</p><p class=""> #29=#P"F:\\cl\\tests\\asdf\\asdf-windows\\test\\test-encodings.script" for input pos 2870</p><p class=""> @</p><p class=""> #x204d5a32>)</p><p class=""> (EXCL::LOAD-FROM-STREAM-OR-BUNDLE #28# #29# NIL T 2 NIL NIL)</p><p class=""> (EXCL::LOAD-2</p><p class=""><br></p><p class=""> #30="test-encodings.script"</p><p class=""> T</p><p class=""> #31=(#P""</p><p class=""> #P(:TYPE "fasl")</p><p class=""> #P(:TYPE "cl")</p><p class=""> #P(:TYPE "lisp")</p><p class=""> #P(:TYPE "lsp"))</p><p class=""> :ERROR</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> :DEFAULT</p><p class=""> NIL</p><p class=""> NIL)</p><p class=""> (EXCL::LOAD-1</p><p class=""><br></p><p class=""> #30#</p><p class=""> T</p><p class=""> #31#</p><p class=""> :ERROR</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> NIL</p><p class=""> :DEFAULT</p><p class=""> NIL</p><p class=""> NIL)</p><p class=""> (LOAD #30#)</p><p class=""> [... EXCL::EVAL-AS-PROGN ]</p><p class=""> (LET</p><p class=""><br></p><p class=""> ((ASDF-TEST::NAME (STRING ASDF-TEST::FILE)))</p><p class=""> (FORMAT</p><p class=""> T</p><p class=""> "Running ~A with ~A~%"</p><p class=""> ASDF-TEST::NAME</p><p class=""> (ASDF-TEST:ACALL :IMPLEMENTATION-IDENTIFIER))</p><p class=""> (LOAD ASDF-TEST::NAME))</p><p class=""> [... EXCL::%EVAL ]</p><p class=""> ((:INTERNAL ASDF-TEST:RUN-TEST-SCRIPT))</p><p class=""> (SYS::..RUNTIME-OPERATION #8#)</p><p class=""><br></p><p class="">... more older frames ...</p><p class="">Above backtrace due to this condition:</p><p class="">illegal namestring: "/cygdrive/f/cl/tests/asdf/asdf-windows/:/cygdrive/f/cl/tests/asdf/asdf-windows/uiop/:/cygdrive/f/cl/tests/asdf/asdf-windows/ext//:" [6]</p><p class="">Script failed</p><p class=""><br></p><p class=""><The Lisp process exited with status 1 (0x1)></p><div><br></div><div><br></div></div>
</div></div>