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