With a bit more Windows testing we have 1 failure on SBCL and 3 or 4 on
clisp. Here's a summary (the Allegro failure below is included in the
attached file):
On Fri, Feb 21, 2014 at 4:31 PM, Dave Cooper <david.coo...@genworks.com>wrote:
>
> Sorry to be late to the party again with Windows testing...
>
> So far I'm seeing a consistent failure for every Allegro variant on
> Windows for test-sysdef-asdf.
>
> Here is the error:
>
>
> These two expressions fail comparison with equal:
>
> (asdf-test::system-lisp-files :uiop) evaluates to ("uiop\\package.lisp"
> "uiop\\common-lisp.lisp" "uiop\\utility.lisp" "uiop\\os.lisp"
> "uiop\\pathname.lisp" "uiop\\filesystem.lisp" "uiop\\stream.lisp"
> "uiop\\image.lisp" "uiop\\run-program.lisp" "uiop\\lisp-build.lisp"
> "uiop\\configuration.lisp" "uiop\\backward-driver.lisp" "uiop\\driver.lisp")
>
> (asdf-test::makefile-lisp-files "driver-files") evaluates to
> ("uiop/package.lisp" "uiop/common-lisp.lisp" "uiop/utility.lisp"
> "uiop/os.lisp" "uiop/pathname.lisp" "uiop/filesystem.lisp"
> "uiop/stream.lisp" "uiop/image.lisp" "uiop/run-program.lisp"
> "uiop/lisp-build.lisp" "uiop/configuration.lisp"
> "uiop/backward-driver.lisp" "uiop/driver.lisp")
>
> Script failed
>
>
>
>
--
My Best,
Dave Cooper
3.1.0.70 results:
Allegro/Windows (all variants) for test-sysdef-asdf:
====================================================
These two expressions fail comparison with equal:
(asdf-test::system-lisp-files :uiop) evaluates to ("uiop\\package.lisp"
"uiop\\common-lisp.lisp" "uiop\\utility.lisp" "uiop\\os.lisp"
"uiop\\pathname.lisp" "uiop\\filesystem.lisp" "uiop\\stream.lisp"
"uiop\\image.lisp" "uiop\\run-program.lisp" "uiop\\lisp-build.lisp"
"uiop\\configuration.lisp" "uiop\\backward-driver.lisp" "uiop\\driver.lisp")
(asdf-test::makefile-lisp-files "driver-files") evaluates to
("uiop/package.lisp" "uiop/common-lisp.lisp" "uiop/utility.lisp" "uiop/os.lisp"
"uiop/pathname.lisp" "uiop/filesystem.lisp" "uiop/stream.lisp"
"uiop/image.lisp" "uiop/run-program.lisp" "uiop/lisp-build.lisp"
"uiop/configuration.lisp" "uiop/backward-driver.lisp" "uiop/driver.lisp")
Script failed
SBCL/Windows
============
Testing: test-touch-system-1.script
f:/cl-engines/windows/sbcl/sbcl-1.1.12-win-x86/sbcl.exe --noinform
--no-userinit --no-sysinit --disable-debugger --eval
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-touch-system-1.script|))))"
; loading #P"F:/cl/tests/asdf/asdf-windows/build/fasls/sbcl/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
; loading #P"F:/cl/tests/asdf/asdf-windows/test/test-touch-system-1.script"
TEST1.ASD and
(TEST-SOURCE "test1.asd") both evaluate to same path:
#P"F:/cl/tests/asdf/asdf-windows/test/test1.asd"
; Loading system definition for test1 from
F:/cl/tests/asdf/asdf-windows/test/test1.asd
;; loading #P"F:/cl/tests/asdf/asdf-windows/test/test1.asd"
; Registering #<SYSTEM "test1">
BLAH
ASDF-TEST::DATE1 => 3591196848
ASDF-TEST::DATE2 => 3591196248
ASDF-TEST::DATE3 => 3591196548
ASDF-TEST::DATE4 => 3602006747
ASDF-TEST::DATE5 => 3591196248
; Loading system definition for test1 from
F:/cl/tests/asdf/asdf-windows/test/test1.asd
;; loading #P"F:/cl/tests/asdf/asdf-windows/test/test1.asd"
TEST ABORTED: The assertion (> DATE6 DATE4) failed with DATE6 = 3602006658,
DATE4 = 3602006747.
Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {23FC41B9}>
0: ((LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX))
1: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN
SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {25C82F7D}>)
2: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN
SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {25C82F65}>)
3: (SB-DEBUG:PRINT-BACKTRACE :STREAM #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDOUT*
{22417CB9}> :START 0 :FROM :DEBUGGER-FRAME :COUNT 69 :PRINT-THREAD T
:PRINT-FRAME-SOURCE NIL :METHOD-FRAME-STYLE NIL)
4: ((LAMBDA NIL :IN UIOP/IMAGE:PRINT-BACKTRACE))
5: ((LAMBDA NIL :IN UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX))
6: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN
UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX) {25C82F55}>)
7: (UIOP/IMAGE:PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR "~@<The assertion ~S
failed~:[.~:; ~
with ~:*~{~{~S = ~S~}~^, ~}.~]~:@>"
{25C814E1}> :STREAM #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDOUT* {22417CB9}> :COUNT
69)
8: (ASDF-TEST:ACALL :PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR "~@<The assertion
~S failed~:[.~:; ~
with ~:*~{~{~S = ~S~}~^, ~}.~]~:@>"
{25C814E1}> :COUNT 69 :STREAM #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDOUT*
{22417CB9}>)
9: ((FLET #:FORM-FUN-14 :IN ASDF-TEST::CALL-WITH-TEST))
10: ((FLET #:LAMBDA1 :IN ASDF-TEST::CALL-WITH-TEST) #<SIMPLE-ERROR "~@<The
assertion ~S failed~:[.~:; ~
with ~:*~{~{~S = ~S~}~^, ~}.~]~:@>"
{25C814E1}>)
11: (SIGNAL #<SIMPLE-ERROR "~@<The assertion ~S failed~:[.~:; ~
with ~:*~{~{~S = ~S~}~^, ~}.~]~:@>"
{25C814E1}>)
12: (ERROR #<SIMPLE-ERROR "~@<The assertion ~S failed~:[.~:; ~
with ~:*~{~{~S = ~S~}~^, ~}.~]~:@>"
{25C814E1}>)
13: (SB-KERNEL:ASSERT-ERROR (> ASDF-TEST::DATE6 ASDF-TEST::DATE4)
((ASDF-TEST::DATE6 3602006658) (ASDF-TEST::DATE4 3602006747)) NIL NIL)
14: ((LAMBDA NIL :IN
"F:/cl/tests/asdf/asdf-windows/test/test-touch-system-1.script"))
15: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASSERT (> ASDF-TEST::DATE6
ASDF-TEST::DATE4)) #<NULL-LEXENV>)
16: (SB-EXT:EVAL-TLF (ASSERT (> ASDF-TEST::DATE6 ASDF-TEST::DATE4)) 25
#<NULL-LEXENV>)
17: ((FLET SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (ASSERT (>
ASDF-TEST::DATE6 ASDF-TEST::DATE4)) 25)
clisp/Windows
=============
;; Loading file test-run-program.script ...
Testing echo ok 1 via run-program as a list
ok 1 < NUL > C:\cygwin64\tmp\tmpY1EU49WX.tmp 2> NUL
TEST ABORTED:
These two expressions fail comparison with EQUAL:
"ok 1" evaluates to "ok 1"
(DEWINDOWIZE (RUN-PROGRAM '("echo" "ok" "1") :OUTPUT '(:STRING :STRIPPED T)))
evaluates to ""
Testing: test-sysdef-asdf.script
f:/cl-engines/windows/clisp/clisp-2.49/clisp.exe -norc --silent -ansi -I
-on-error exit -x
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-sysdef-asdf.script|))))"
[3]>
;; Loading file script-support.lisp ...
;; Loaded file script-support.lisp
;; Loading file F:\cl\tests\asdf\asdf-windows\build\fasls\clisp\asdf.fas ...
;; Loaded file F:\cl\tests\asdf\asdf-windows\build\fasls\clisp\asdf.fas
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
;; Loading file test-sysdef-asdf.script ...
0 errors, 0 warnings
0 errors, 0 warnings
;; Loading file F:\cl\tests\asdf\asdf-windows\asdf.asd ...
;; Loaded file F:\cl\tests\asdf\asdf-windows\asdf.asd
0 errors, 0 warnings
0 errors, 0 warnings
WARNING: TRACE: redefining function RUN-PROGRAM in
F:\cl\tests\asdf\asdf-windows\test\test-sysdef-asdf.script, was defined
in top-level
;; Tracing function RUN-PROGRAM.
WARNING: TRACE: redefining function REDUCE/STRCAT in
F:\cl\tests\asdf\asdf-windows\test\test-sysdef-asdf.script, was defined
in top-level
;; Tracing function REDUCE/STRCAT.
Testing that the Makefile and ASDF agree on the order of UIOP files
; Loading system definition for uiop from
F:\cl\tests\asdf\asdf-windows\uiop\uiop.asd
;; Loading file F:\cl\tests\asdf\asdf-windows\uiop\uiop.asd ...
; Registering #<SYSTEM "uiop">
;; Loaded file F:\cl\tests\asdf\asdf-windows\uiop\uiop.asd
1. Trace:
(RUN-PROGRAM '("make" "--quiet" "--no-print-directory" "driver-files") ':OUTPUT
':STRING ':ERROR-OUTPUT 'T ':DIRECTORY
'#P"F:\\cl\\tests\\asdf\\asdf-windows\\")
2. Trace:
(REDUCE/STRCAT
'("make --quiet --no-print-directory driver-files" " <" " " "NUL" " >" " "
"C:\\cygwin64\\tmp\\tmp6MR300JV.tmp" " 2>" " "
"C:\\cygwin64\\tmp\\tmp7FPQWZKP.tmp"))
2. Trace: REDUCE/STRCAT ==> "make --quiet --no-print-directory driver-files <
NUL > C:\\cygwin64\\tmp\\tmp6MR300JV.tmp 2>
C:\\cygwin64\\tmp\\tmp7FPQWZKP.tmp"uiop/package.lisp uiop/common-lisp.lisp
uiop/utility.lisp uiop/os.lisp uiop/pathname.lisp uiop/filesystem.lisp
uiop/stream.lisp uiop/image.lisp uiop/run-program.lisp uiop/lisp-build.lisp
uiop/configuration.lisp uiop/backward-driver.lisp uiop/driver.lisp
make[2]: *** No rule to make target '<'. Stop.
TEST ABORTED: Subprocess run with command ("make" "--quiet"
"--no-print-directory" "driver-files") exited with error code 2
<1/826> #<SYSTEM-FUNCTION EXT:SHOW-STACK> 3
<2/819> #<COMPILED-FUNCTION SYSTEM::PRINT-BACKTRACE>
<3/815> #<COMPILED-FUNCTION UIOP/IMAGE:RAW-PRINT-BACKTRACE>
<4/810> #<COMPILED-FUNCTION UIOP/IMAGE::PRINT-BACKTRACE-1-2>
<5/778> #<COMPILED-FUNCTION UIOP/IMAGE::PRINT-BACKTRACE-1>
<6/653> #<COMPILED-FUNCTION UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX>
<7/649> #<COMPILED-FUNCTION UIOP/IMAGE:PRINT-BACKTRACE>
<8/644> #<COMPILED-FUNCTION UIOP/IMAGE:PRINT-CONDITION-BACKTRACE>
<9/642> #<SYSTEM-FUNCTION APPLY> 2
Testing: test-touch-system-1.script
f:/cl-engines/windows/clisp/clisp-2.49/clisp.exe -norc --silent -ansi -I
-on-error exit -x
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-touch-system-1.script|))))"
[3]>
;; Loading file script-support.lisp ...
;; Loaded file script-support.lisp
;; Loading file F:\cl\tests\asdf\asdf-windows\build\fasls\clisp\asdf.fas ...
;; Loaded file F:\cl\tests\asdf\asdf-windows\build\fasls\clisp\asdf.fas
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
;; Loading file test-touch-system-1.script ...
TEST1.ASD and
(TEST-SOURCE "test1.asd") both evaluate to same path:
#P"F:\\cl\\tests\\asdf\\asdf-windows\\test\\test1.asd"
; Loading system definition for test1 from
F:\cl\tests\asdf\asdf-windows\test\test1.asd
;; Loading file F:\cl\tests\asdf\asdf-windows\test\test1.asd ...
; Registering #<SYSTEM "test1">
;; Loaded file F:\cl\tests\asdf\asdf-windows\test\test1.asd
BLAH
ASDF-TEST::DATE1 => 3591196848
ASDF-TEST::DATE2 => 3591196248
ASDF-TEST::DATE3 => 3591196548
ASDF-TEST::DATE4 => 3602006832
ASDF-TEST::DATE5 => 3591196248
; Loading system definition for test1 from
F:\cl\tests\asdf\asdf-windows\test\test1.asd
;; Loading file F:\cl\tests\asdf\asdf-windows\test\test1.asd ...
;; Loaded file F:\cl\tests\asdf\asdf-windows\test\test1.asd
TEST ABORTED: (> DATE6 DATE4) must evaluate to a non-NIL value.
<1/616> #<SYSTEM-FUNCTION EXT:SHOW-STACK> 3
<2/609> #<COMPILED-FUNCTION SYSTEM::PRINT-BACKTRACE>
<3/605> #<COMPILED-FUNCTION UIOP/IMAGE:RAW-PRINT-BACKTRACE>
<4/600> #<COMPILED-FUNCTION UIOP/IMAGE::PRINT-BACKTRACE-1-2>
<5/568> #<COMPILED-FUNCTION UIOP/IMAGE::PRINT-BACKTRACE-1>
<6/443> #<COMPILED-FUNCTION UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX>
<7/439> #<COMPILED-FUNCTION UIOP/IMAGE:PRINT-BACKTRACE>
<8/434> #<COMPILED-FUNCTION UIOP/IMAGE:PRINT-CONDITION-BACKTRACE>
<9/432> #<SYSTEM-FUNCTION APPLY> 2
[430] EVAL frame for form
(APPLY
(APPLY 'ASDF-TEST:ASYM
(IF (CONSP ASDF-TEST::NAME) ASDF-TEST::NAME (LIST ASDF-TEST::NAME)))
ASDF-TEST::ARGS)
[411] APPLY frame for call (ASDF-TEST:ACALL ':PRINT-CONDITION-BACKTRACE
'#<SIMPLE-ERROR #x19FD12A5> ':COUNT '69 ':STREAM '#<OUTPUT UNBUFFERED
FILE-STREAM CHARACTER>)
