Re: Release plan for asdf

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)>