With latest pull on 3.0.2.22, we have CCL failures (I forget if these were happening before the very recent changes or not). Anyway we are down to 2 failures on CCL Windows (just copying the text from the failures, separated by some spaces below):
Testing awkward legacy output capture via run-shell-command TEST ABORTED: These two expressions fail comparison with EQUAL: "ok 1" evaluates to "ok 1" (DEWINDOWIZE (RUN-PROGRAM '("echo" "ok 1") :OUTPUT :LINE)) evaluates to "ok " 1" (22878D10) : 1 (RAW-PRINT-BACKTRACE :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> :COUNT 69) 181 (&KEY :STREAM :COUNT) STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> COUNT: 69
*DEBUG-IO*: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D>
(22878D58) : 2 (FUNCALL (FUNCTION #<(:INTERNAL UIOP/IMAGE:PRINT-BACKTRACE)>)) 581 NIL
*PACKAGE*: #<Package "COMMON-LISP"> *PRINT-READABLY*: NIL *PRINT-CIRCLE*: T *PRINT-MISER-WIDTH*: 75 *PRINT-LENGTH*: NIL *PRINT-LEVEL*: NIL *PRINT-PRETTY*: T #:G8715: (ERROR) CCL::%HANDLERS%: ((ERROR) (ERROR) (CCL:PROCESS-RESET)) UIOP/IMAGE::KEYS: (:STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> :COUNT 69)
(22878E70) : 3 (CALL-WITH-SAFE-IO-SYNTAX #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL UIOP/IMAGE:PRINT-BACKTRACE) #x210079C2FF> :PACKAGE :CL) 1533 (UIOP/STREAM::THUNK &KEY :PACKAGE) UIOP/STREAM::THUNK: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
UIOP/IMAGE:PRINT-BACKTRACE) #x210079C2FF> PACKAGE: :CL
*PACKAGE*: #<Package "COMMON-LISP-USER"> *PRINT-ARRAY*: T *PRINT-BASE*: 10 *PRINT-CASE*: :UPCASE *PRINT-CIRCLE*: NIL *PRINT-ESCAPE*: T *PRINT-GENSYM*: T *PRINT-LENGTH*: NIL *PRINT-LEVEL*: NIL *PRINT-LINES*: NIL *PRINT-MISER-WIDTH*: NIL *PRINT-PPRINT-DISPATCH*: #<PPRINT-DISPATCH-TABLE #x210033925D> *PRINT-PRETTY*: NIL *PRINT-RADIX*: NIL *PRINT-READABLY*: T *PRINT-RIGHT-MARGIN*: NIL *READ-BASE*: 10 *READ-DEFAULT-FLOAT-FORMAT*: SINGLE-FLOAT *READ-EVAL*: T *READ-SUPPRESS*: NIL *READTABLE*: #<READTABLE #x21000C710D> CCL:*PRINT-ABBREVIATE-QUOTE*: NIL CCL:*PRINT-STRUCTURE*: T CCL:*PRINT-SIMPLE-VECTOR*: NIL CCL:*PRINT-SIMPLE-BIT-VECTOR*: NIL CCL:*PRINT-STRING-LENGTH*: NIL *PACKAGE*: #<Package "COMMON-LISP"> *READ-DEFAULT-FLOAT-FORMAT*: DOUBLE-FLOAT *PRINT-READABLY*: NIL *READ-EVAL*: NIL
(22879260) : 4 (PRINT-BACKTRACE :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> :COUNT 69) 253 (&REST UIOP/IMAGE::KEYS &KEY :STREAM :COUNT) UIOP/IMAGE::KEYS: (:STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> :COUNT 69) STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> COUNT: 69
(228792A0) : 5 (PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR #x210079CADD> :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> :COUNT 69) 157 (CONDITION &KEY :STREAM :COUNT) CONDITION: #<SIMPLE-ERROR #x210079CADD> STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> COUNT: 69
(228792D8) : 6 (ACALL :PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR #x210079CADD> :COUNT 69 :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D>) 261 (ASDF-TEST::NAME &REST ASDF-TEST::ARGS) ASDF-TEST::NAME: :PRINT-CONDITION-BACKTRACE ASDF-TEST::ARGS: (#<SIMPLE-ERROR #x210079CADD> :COUNT 69 :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D>)
(22879308) : 7 (FUNCALL (FUNCTION #<(:INTERNAL ASDF-TEST::CALL-WITH-TEST)>) #<SIMPLE-ERROR #x210079CADD>) 797 (ASDF-TEST::C) ASDF-TEST::C: #<SIMPLE-ERROR #x210079CADD>
#:G265: (ERROR) CCL::%HANDLERS%: ((ERROR) (CCL:PROCESS-RESET))
(22879340) : 8 (SIGNAL #<SIMPLE-ERROR #x210079CADD>) 973 (CONDITION &REST CCL::ARGS) CONDITION: #<SIMPLE-ERROR #x210079CADD> CCL::ARGS: NIL
CCL::%HANDLERS%: ((CCL:PROCESS-RESET)) CCL::TAG: (ERROR #<Compiled-function # (Non-Global) #x21004574CF>) CCL::HANDLERS: (ERROR #<Compiled-function # (Non-Global) #x21004574CF>) CCL::FN: #<Compiled-function (:INTERNAL ASDF-TEST::CALL-WITH-TEST) (Non-Global) #x21004574CF>
(22879398) : 9 (%ERROR #<SIMPLE-ERROR #x210079CADD> (EQUAL "ok 1" "ok 1" (ASDF-TEST::DEWINDOWIZE #) "ok " 1") 72413816) 117 (CONDITION CCL::ARGS CCL::ERROR-POINTER) CONDITION: #<SIMPLE-ERROR #x210079CADD> CCL::ARGS: (EQUAL "ok 1" "ok 1" (ASDF-TEST::DEWINDOWIZE #) "ok " 1") CCL::ERROR-POINTER: 72413816
(228793C0) : 10 (ASSERT-COMPARE-HELPER EQUAL "ok 1" (ASDF-TEST::DEWINDOWIZE (UIOP/RUN-PROGRAM:RUN-PROGRAM '# :OUTPUT :LINE)) "ok 1" "ok " 1") 133 (ASDF-TEST::OP ASDF-TEST::QX ASDF-TEST::QY ASDF-TEST::X ASDF-TEST::Y) ASDF-TEST::OP: EQUAL ASDF-TEST::QX: "ok 1" ASDF-TEST::QY: (ASDF-TEST::DEWINDOWIZE (UIOP/RUN-PROGRAM:RUN-PROGRAM '# :OUTPUT :LINE)) ASDF-TEST::X: "ok 1" ASDF-TEST::Y: "ok " 1"
(228793F8) : 11 (CALL-CHECK-REGS ASDF-TEST::ASSERT-COMPARE-HELPER EQUAL "ok 1" (ASDF-TEST::DEWINDOWIZE (UIOP/RUN-PROGRAM:RUN-PROGRAM '# :OUTPUT :LINE)) "ok 1" "ok " 1") 221 (CCL::FN &REST CCL::ARGS) CCL::FN: ASDF-TEST::ASSERT-COMPARE-HELPER CCL::ARGS: (EQUAL "ok 1" (ASDF-TEST::DEWINDOWIZE #) "ok 1" "ok " 1")
CCL::OLD-REGS: (NIL (NIL) CCL:*SAVE-SOURCE-LOCATIONS* 810710)
(22879430) : 12 (FUNCALL (FUNCTION #<(:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM)>)) 757 NIL
CCL::ENV: #<CCL::LEXICAL-ENVIRONMENT #x2100786AFD> CCL::*NX-SOURCE-NOTE-MAP*: #<HASH-TABLE :TEST EQ size 168/192 #x2100786A7D> CCL::*LOADING-TOPLEVEL-LOCATION*: #<SOURCE-NOTE "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script":3346-3428 "(assert-equal "ok 1" (dewindowize (run-program '("echo" "ok 1") :output :line)))"> PRINT: NIL CCL::VAL: (ASDF-TEST:ASSERT-EQUAL "ok 1" (ASDF-TEST::DEWINDOWIZE #)) CCL::EOF-VAL: (NIL) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script"/1172 UTF-8) #x210078757D>
(228794B8) : 13 (CALL-WITH-COMPILATION-UNIT #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x1F70DEF> :OVERRIDE NIL) 197 (CCL::THUNK &KEY :OVERRIDE) CCL::THUNK: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x1F70DEF> CCL::OVERRIDE: NIL
CCL::*OUTSTANDING-DEFERRED-WARNINGS*: #CCL::DEFERRED-WARNINGS #x2100786BDD
(22879500) : 14 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script"/1172 UTF-8) #x210078757D> NIL) 357 (STREAM PRINT) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script"/1172 UTF-8) #x210078757D> PRINT: NIL
CCL::EOF-VAL: (NIL) CCL::VAL: (ASDF-TEST:ASSERT-EQUAL "ok 1" (ASDF-TEST::DEWINDOWIZE #)) #:WITH-COMPILATION-UNIT-BODY: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY
CCL::LOAD-FROM-STREAM) #x1F70DEF>
(22879540) : 15 (%LOAD
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script" T NIL :ERROR :DEFAULT NIL) 5037 (CCL::FILE-NAME CCL::VERBOSE PRINT CCL::IF-DOES-NOT-EXIST CCL:EXTERNAL-FORMAT CCL::PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
CCL::SOURCE-FILE: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script" *LOAD-PATHNAME*: #P"test-run-program.script" *LOAD-TRUENAME*: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script" *PACKAGE*: #<Package "ASDF-TEST"> *READTABLE*: #<READTABLE #x21002FDB5D> CCL::*LOADING-FILES*: (#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script") CCL:*LOADING-FILE-SOURCE-FILE*: "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script" CCL::*LOADING-TOPLEVEL-LOCATION*: NIL #:G134914: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script"/1172 UTF-8) #x210078757D> #:G134915: NIL STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-run-program.script"/1172 UTF-8) #x210078757D>
(22879698) : 16 (LOAD "test-run-program.script" :VERBOSE T :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT :PRESERVE-OPTIMIZATION-SETTINGS NIL) 1029 (CCL::FILE-NAME &KEY :VERBOSE :PRINT :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT :PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: "test-run-program.script" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
#:LOAD-OTHER: #<RESTART CCL::LOAD-OTHER #x1F7111D> #:SKIP-LOAD: #<RESTART CCL::SKIP-LOAD #x1F710CD> #:RETRY-LOAD: #<RESTART CCL::RETRY-LOAD #x1F7107D> #:G134855: (#<RESTART CCL::RETRY-LOAD #x1F7107D> #<RESTART CCL::SKIP-LOAD #x1F710CD> #<RESTART CCL::LOAD-OTHER #x1F7111D>) CCL::%RESTARTS%: ((#<RESTART CCL::RETRY-LOAD #x1F7107D> #<RESTART CCL::SKIP-LOAD #x1F710CD> #<RESTART CCL::LOAD-OTHER #x1F7111D>) (#<RESTART CONTINUE #x1F714ED>) (#<RESTART ABORT #x1F715FD>) (#<RESTART CCL:ABORT-BREAK #x1F7181D> #<RESTART ABORT #x1F7186D>))
(22879748) : 17 (FUNCALL (FUNCTION #<Anonymous Function #x210077FF4F>)) 85 NIL
(22879760) : 18 (CALL-WITH-ASDF-CACHE #<Anonymous Function #x210077FF4F> :OVERRIDE NIL) 301 (ASDF/CACHE::THUNK &KEY :OVERRIDE) ASDF/CACHE::THUNK: #<Anonymous Function #x210077FF4F> ASDF/CACHE::OVERRIDE: NIL
ASDF/CACHE:*ASDF-CACHE*: #<HASH-TABLE :TEST EQUAL size 0/60 #x210077F93D>
(228797A8) : 19 (CALL-WITH-TEST #<Anonymous Function #x210077FF4F>) 325 (ASDF-TEST::THUNK) ASDF-TEST::THUNK: #<Anonymous Function #x210077FF4F>
#:G261: (ERROR #<Compiled-function # (Non-Global) #x21004574CF>) CCL::%HANDLERS%: ((ERROR #) (CCL:PROCESS-RESET))
(228797E8) : 20 (CALL-CHECK-REGS ASDF-TEST::CALL-WITH-TEST #<Anonymous Function #x210077FF4F>) 221 (CCL::FN &REST CCL::ARGS) CCL::FN: ASDF-TEST::CALL-WITH-TEST CCL::ARGS: (#<Anonymous Function #x210077FF4F>)
CCL::OLD-REGS: (#. #<Compiled-function CCL::READ-EVAL #x1004FEC6F> # 810710)
(22879820) : 21 (CHEAP-EVAL (ASDF-TEST:WITH-TEST NIL (LOAD #))) 101 (CCL::FORM) CCL::FORM: (ASDF-TEST:WITH-TEST NIL (LOAD #))
CCL::*NX-SOURCE-NOTE-MAP*: NIL
(22879858) : 22 (READ-DISPATCH #<STRING-INPUT-STREAM #x21004383ED> ##) 757 (STREAM CHAR) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CHAR: ##
CCL::INFO: (#<Compiled-function CCL::READ-DISPATCH #x1004EFF1F> # # # # ...) CCL::TB: #("" 0 0 16 NIL) CCL::SUBCHAR: #. CCL::NUMARG: NIL CCL::DISPFUN: #<Compiled-function CCL::READ-EVAL #x1004FEC6F>
(228798E0) : 23 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383ED> ## (NIL)) 597 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::FIRSTCHAR: ## CCL::DOT-OK: (NIL)
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 9 CCL::START-POS: 93 CCL::DEF: (#<Compiled-function CCL::READ-DISPATCH #x1004EFF1F> # # # # ...)
(22879948) : 24 (%READ-LIST-EXPRESSION #<STRING-INPUT-STREAM #x21004383ED> (NIL) #)) 229 (STREAM CCL::DOT-OK &OPTIONAL CCL::TERMCH) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::DOT-OK: (NIL) CCL::TERMCH: #)
CCL::FIRSTCH: ##
(22879998) : 25 (READ-LIST #<STRING-INPUT-STREAM #x21004383ED> NIL #)) 613 (STREAM &OPTIONAL CCL::NODOTS CCL::TERMCH) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::NODOTS: NIL CCL::TERMCH: #)
CCL::DOT-OK: (NIL) CCL::HEAD: (NIL
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/script-support.lisp" T T) CCL::TAIL: (T) CCL::SOURCE-NOTE-LIST: NIL CCL::FIRSTFORM: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/script-support.lisp" CCL::FIRSTFORM-P: T CCL::FIRSTFORM-SOURCE-NOTE: NIL
(22879A18) : 26 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383ED> #( NIL) 469 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::FIRSTCHAR: #( CCL::DOT-OK: NIL
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 8 CCL::START-POS: 2 CCL::DEF: #<Anonymous Function #x1004E6A6F>
(22879A78) : 27 (%READ-FORM #<STRING-INPUT-STREAM #x21004383ED> 0 NIL) 573 (STREAM CCL::ARG CCL::EOF-VAL) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::ARG: 0 CCL::EOF-VAL: NIL
CCL::CH: #(
(22879AB8) : 28 (FUNCALL (FUNCTION #CCL::|'-reader|) #<STRING-INPUT-STREAM #x21004383ED> #') 77 (STREAM IGNORE) STREAM: #<STRING-INPUT-STREAM #x21004383ED> IGNORE: #'
(22879AE0) : 29 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383ED> #' NIL) 469 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::FIRSTCHAR: #' CCL::DOT-OK: NIL
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 8 CCL::START-POS: 1 CCL::DEF: #<Compiled-function CCL::|'-reader| (Non-Global) #x1004E66BF>
(22879B40) : 30 (%READ-FORM #<STRING-INPUT-STREAM #x21004383ED> 0 NIL) 573 (STREAM CCL::ARG CCL::EOF-VAL) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::ARG: 0 CCL::EOF-VAL: NIL
CCL::CH: #'
(22879B80) : 31 (READ-INTERNAL #<STRING-INPUT-STREAM #x21004383ED> T NIL NIL) 253 (STREAM CCL::EOF-ERROR-P CCL::EOF-VALUE CCL::RECURSIVE-P) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::RECURSIVE-P: NIL
CCL::%READ-OBJECTS%: NIL CCL::%KEEP-WHITESPACE%: NIL
(22879C00) : 32 (READ #<STRING-INPUT-STREAM #x21004383ED> T NIL NIL) 157 (&OPTIONAL STREAM CCL::EOF-ERROR-P CCL::EOF-VALUE CCL::RECURSIVE-P) STREAM: #<STRING-INPUT-STREAM #x21004383ED> CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::RECURSIVE-P: NIL
(22879C50) : 33 (READ-FROM-STRING
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))" T NIL :START 0 :END NIL :PRESERVE-WHITESPACE NIL) 413 (STRING &OPTIONAL CCL::EOF-ERROR-P CCL::EOF-VALUE &KEY :START :END :PRESERVE-WHITESPACE) STRING: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))" CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::START: 0 CCL::END: NIL CCL::PRESERVE-WHITESPACE: NIL
CCL::IDX: NIL STREAM: #<STRING-INPUT-STREAM #x21004383ED>
(22879CF8) : 34 (FUNCALL (FUNCTION #<(:INTERNAL CCL::EVAL-STRING CCL::STARTUP-CCL)>)
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))") 445 (CCL::S) CCL::S: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))"
#:CONTINUE: #<RESTART CONTINUE #x1F714ED> #:G140482: (#<RESTART CONTINUE #x1F714ED>) CCL::%RESTARTS%: ((#<RESTART CONTINUE #x1F714ED>) (#<RESTART ABORT #x1F715FD>) (#<RESTART CCL:ABORT-BREAK #x1F7181D> #<RESTART ABORT #x1F7186D>))
(22879D40) : 35 (STARTUP-CCL NIL) 1533 (&OPTIONAL CCL::INIT-FILE) CCL::INIT-FILE: NIL
#:ABORT: #<RESTART ABORT #x1F715FD> #:G140470: (#<RESTART ABORT #x1F715FD>) CCL::%RESTARTS%: ((#<RESTART ABORT #x1F715FD>) (#<RESTART CCL:ABORT-BREAK #x1F7181D> #<RESTART ABORT #x1F7186D>)) #:G140475: ((:EVAL . "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))")) CCL::P: (:EVAL . "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))") CCL::PARAM: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-run-program.script|))))" #:G140478: :EVAL
(22879DA8) : 36 (FUNCALL (FUNCTION #<(:INTERNAL (CCL:TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>)) 61 NIL
CCL::F: CCL::LISTENER-FUNCTION CCL::INIT-FILE: "home:ccl-init"
(22879DC8) : 37 (FUNCALL (FUNCTION #<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>)) 645 NIL
*TERMINAL-IO*: #<ECHOING-TWO-WAY-STREAM input #<BASIC-CHARACTER-INPUT-STREAM UTF-8 (PIPE/436) #x2100433B3D>, output #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> #x21004388CD> CCL::CLOSE-STREAMS: NIL CCL::CLEANUP-FUNCTION: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #x21004317DF> CCL::INITIAL-FUNCTION: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #x210043178F> CCL::AUTO-FLUSH: T CCL:OUTPUT-STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043363D> CCL:INPUT-STREAM: #<BASIC-CHARACTER-INPUT-STREAM UTF-8 (PIPE/436) #x2100433B3D> CCL::ECHOING: T
(22879E60) : 38 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) [Active] #x21004312DD> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)) 669 (CCL:PROCESS CCL::INITIAL-FORM) CCL:PROCESS: #<TTY-LISTENER listener(1) [Active] #x21004312DD> CCL::INITIAL-FORM: (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)
CCL::EXITED: NIL #:G142760: (CCL:PROCESS-RESET) CCL::%HANDLERS%: ((CCL:PROCESS-RESET)) #:ABORT: #<RESTART ABORT #x1F7186D> #:ABORT-BREAK: #<RESTART CCL:ABORT-BREAK #x1F7181D> #:G142761: (#<RESTART CCL:ABORT-BREAK #x1F7181D> #<RESTART ABORT #x1F7186D>) CCL::%RESTARTS%: ((#<RESTART CCL:ABORT-BREAK #x1F7181D> #<RESTART ABORT #x1F7186D>))
(22879EF0) : 39 (FUNCALL (FUNCTION #<(:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (CCL:PROCESS)))>) #<TTY-LISTENER listener(1) [Active] #x21004312DD> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)) 573 (CCL:PROCESS CCL::INITIAL-FORM) CCL:PROCESS: #<TTY-LISTENER listener(1) [Active] #x21004312DD> CCL::INITIAL-FORM: (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)
CCL:*CURRENT-PROCESS*: #<TTY-LISTENER listener(1) [Active] #x21004312DD> #:G142746: (*PRINT-PPRINT-DISPATCH* CCL::*FREE-XPS* CCL::*FREE-CIRCULARITY-HASH-TABLES* CCL::*LOGICAL-BLOCK-XP* CCL::*FORMAT-TOP-LEVEL* ...) #:G142747: (#<PPRINT-DISPATCH-TABLE #x21004390BD> NIL NIL NIL NIL ...) CCL::*INTERRUPT-LEVEL*: 0 #:G142748: ("Active") #:G142749: "Reset"
(22879F98) : 40 (FUNCALL (FUNCTION #<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>)) 277 NIL
CCL::*CURRENT-LISP-THREAD*: #<LISP-THREAD listener [tcr @ #x62F6B0] #x2100430EED> CCL::INITIAL-FUNCTION: (#<Compiled-function # (Non-Global) #x10048AD7F> #<TTY-LISTENER listener(1) [Active] #x21004312DD> #) CCL::TCR: 810710 CCL::THREAD: #<LISP-THREAD listener [tcr @ #x62F6B0] #x2100430EED>
Above backtrace due to this condition: These two expressions fail comparison with EQUAL: "ok 1" evaluates to "ok 1" (ASDF-TEST::DEWINDOWIZE (UIOP/RUN-PROGRAM:RUN-PROGRAM (QUOTE ("echo" "ok 1")) :OUTPUT :LINE)) evaluates to "ok " 1" Script failed Using f:/cl-engines/ccl-win-1.10-dev/wx86cl64.exe, test-run-program.script failed you can retry compilation with: ./test/run-tests.sh ccl test-run-program.script or more interactively (and maybe with rlwrap or in emacs), start with: (cd test ; f:/cl-engines/ccl-win-1.10-dev/wx86cl64.exe --no-init --quiet ) then copy/paste: '(#.(load "script-support.lisp") #.(asdf-test::da) #.(load-asdf) #.(frob-packages) #.(load "test-run-program.script"))
Testing: test-stamp-propagation.script f:/cl-engines/ccl-win-1.10-dev/wx86cl64.exe --no-init --quiet --batch --eval "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))" ;Loading #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/build/fasls/ccl/asdf.wx64fsl"...Configuring ASDF Enabling debugging Being a bit verbose Comparing directories ASDF-TEST:*TEST-DIRECTORY* and ASDF-TEST::X both evaluate to same path: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/" Frob packages ;Loading #P"test-stamp-propagation.script"... ;Loading #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"... FOO XXX :EXECUTE :TSP ; Registering #<SYSTEM "test-stamp-propagation"> Testing stamp propagation by defsystem :ASDF loading system ASDF-CACHE NIL XXX :COMPILING :SYSTEM ;Compiling "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/file1.lisp"... XXX :COMPILE-TOPLEVEL :FILE1 ;Loading #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/build/fasls/ccl-1.10-f96-win-x64/asdf/test/stamp-propagation/file1.wx64fsl"... XXX :LOAD-TOPLEVEL :FILE1 ;Compiling "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/file2.lisp"... XXX :COMPILE-TOPLEVEL :FILE2 ;Loading #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/build/fasls/ccl-1.10-f96-win-x64/asdf/test/stamp-propagation/file2.wx64fsl"... XXX :LOAD-TOPLEVEL :FILE2 XXX :LOADING :SYSTEM EVAL-NOTES ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2) (:LOADING :SYSTEM)) touching first source file and reloading defsystem should recompile & reload everything ASDF-CACHE NIL XXX :COMPILING :SYSTEM XXX :LOADING :SYSTEM EVAL-NOTES ((:COMPILING :SYSTEM) (:LOADING :SYSTEM)) TEST ABORTED: These two expressions fail comparison with EQUAL: (SANITIZE-LOG (RELOAD DEFSYSTEM)) evaluates to ((:COMPILING :SYSTEM)) '((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2)) evaluates to ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2)) (227F89A0) : 1 (RAW-PRINT-BACKTRACE :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> :COUNT 69) 181 (&KEY :STREAM :COUNT) STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> COUNT: 69
*DEBUG-IO*: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D>
(227F89E8) : 2 (FUNCALL (FUNCTION #<(:INTERNAL UIOP/IMAGE:PRINT-BACKTRACE)>)) 581 NIL
*PACKAGE*: #<Package "COMMON-LISP"> *PRINT-READABLY*: NIL *PRINT-CIRCLE*: T *PRINT-MISER-WIDTH*: 75 *PRINT-LENGTH*: NIL *PRINT-LEVEL*: NIL *PRINT-PRETTY*: T #:G8715: (ERROR) CCL::%HANDLERS%: ((ERROR) (ERROR) (CCL:PROCESS-RESET)) UIOP/IMAGE::KEYS: (:STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> :COUNT 69)
(227F8B00) : 3 (CALL-WITH-SAFE-IO-SYNTAX #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL UIOP/IMAGE:PRINT-BACKTRACE) #x21007C5F0F> :PACKAGE :CL) 1533 (UIOP/STREAM::THUNK &KEY :PACKAGE) UIOP/STREAM::THUNK: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
UIOP/IMAGE:PRINT-BACKTRACE) #x21007C5F0F> PACKAGE: :CL
*PACKAGE*: #<Package "COMMON-LISP-USER"> *PRINT-ARRAY*: T *PRINT-BASE*: 10 *PRINT-CASE*: :UPCASE *PRINT-CIRCLE*: NIL *PRINT-ESCAPE*: T *PRINT-GENSYM*: T *PRINT-LENGTH*: NIL *PRINT-LEVEL*: NIL *PRINT-LINES*: NIL *PRINT-MISER-WIDTH*: NIL *PRINT-PPRINT-DISPATCH*: #<PPRINT-DISPATCH-TABLE #x210033925D> *PRINT-PRETTY*: NIL *PRINT-RADIX*: NIL *PRINT-READABLY*: T *PRINT-RIGHT-MARGIN*: NIL *READ-BASE*: 10 *READ-DEFAULT-FLOAT-FORMAT*: SINGLE-FLOAT *READ-EVAL*: T *READ-SUPPRESS*: NIL *READTABLE*: #<READTABLE #x21000C710D> CCL:*PRINT-ABBREVIATE-QUOTE*: NIL CCL:*PRINT-STRUCTURE*: T CCL:*PRINT-SIMPLE-VECTOR*: NIL CCL:*PRINT-SIMPLE-BIT-VECTOR*: NIL CCL:*PRINT-STRING-LENGTH*: NIL *PACKAGE*: #<Package "COMMON-LISP"> *READ-DEFAULT-FLOAT-FORMAT*: DOUBLE-FLOAT *PRINT-READABLY*: NIL *READ-EVAL*: NIL
(227F8EF0) : 4 (PRINT-BACKTRACE :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> :COUNT 69) 253 (&REST UIOP/IMAGE::KEYS &KEY :STREAM :COUNT) UIOP/IMAGE::KEYS: (:STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> :COUNT 69) STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> COUNT: 69
(227F8F30) : 5 (PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR #x21007C666D> :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> :COUNT 69) 157 (CONDITION &KEY :STREAM :COUNT) CONDITION: #<SIMPLE-ERROR #x21007C666D> STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> COUNT: 69
(227F8F68) : 6 (ACALL :PRINT-CONDITION-BACKTRACE #<SIMPLE-ERROR #x21007C666D> :COUNT 69 :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D>) 261 (ASDF-TEST::NAME &REST ASDF-TEST::ARGS) ASDF-TEST::NAME: :PRINT-CONDITION-BACKTRACE ASDF-TEST::ARGS: (#<SIMPLE-ERROR #x21007C666D> :COUNT 69 :STREAM #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D>)
(227F8F98) : 7 (FUNCALL (FUNCTION #<(:INTERNAL ASDF-TEST::CALL-WITH-TEST)>) #<SIMPLE-ERROR #x21007C666D>) 797 (ASDF-TEST::C) ASDF-TEST::C: #<SIMPLE-ERROR #x21007C666D>
#:G265: (ERROR) CCL::%HANDLERS%: ((ERROR) (CCL:PROCESS-RESET))
(227F8FD0) : 8 (SIGNAL #<SIMPLE-ERROR #x21007C666D>) 973 (CONDITION &REST CCL::ARGS) CONDITION: #<SIMPLE-ERROR #x21007C666D> CCL::ARGS: NIL
CCL::%HANDLERS%: ((CCL:PROCESS-RESET)) CCL::TAG: (ERROR #<Compiled-function # (Non-Global) #x21004574DF>) CCL::HANDLERS: (ERROR #<Compiled-function # (Non-Global) #x21004574DF>) CCL::FN: #<Compiled-function (:INTERNAL ASDF-TEST::CALL-WITH-TEST) (Non-Global) #x21004574DF>
(227F9028) : 9 (%ERROR #<SIMPLE-ERROR #x21007C666D> (EQUAL (ASDF-TEST::SANITIZE-LOG #) (#) '(# # # # #) ...) 72348170) 117 (CONDITION CCL::ARGS CCL::ERROR-POINTER) CONDITION: #<SIMPLE-ERROR #x21007C666D> CCL::ARGS: (EQUAL (ASDF-TEST::SANITIZE-LOG #) (#) '(# # # # #) ...) CCL::ERROR-POINTER: 72348170
(227F9050) : 10 (ASSERT-COMPARE-HELPER EQUAL (ASDF-TEST::SANITIZE-LOG (ASDF-TEST::RELOAD ASDF/DEFSYSTEM:DEFSYSTEM)) '((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2)) ((:COMPILING :SYSTEM)) ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2))) 133 (ASDF-TEST::OP ASDF-TEST::QX ASDF-TEST::QY ASDF-TEST::X ASDF-TEST::Y) ASDF-TEST::OP: EQUAL ASDF-TEST::QX: (ASDF-TEST::SANITIZE-LOG (ASDF-TEST::RELOAD ASDF/DEFSYSTEM:DEFSYSTEM)) ASDF-TEST::QY: '((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2)) ASDF-TEST::X: ((:COMPILING :SYSTEM)) ASDF-TEST::Y: ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2))
(227F9088) : 11 (TEST-DEFSYSTEM :ASDF) 493 (&OPTIONAL ASDF/DEFSYSTEM:DEFSYSTEM) ASDF/DEFSYSTEM:DEFSYSTEM: :ASDF
(227F90A8) : 12 (CALL-CHECK-REGS ASDF-TEST::TEST-DEFSYSTEM :ASDF) 221 (CCL::FN &REST CCL::ARGS) CCL::FN: ASDF-TEST::TEST-DEFSYSTEM CCL::ARGS: (:ASDF)
CCL::OLD-REGS: (NIL (NIL) CCL:*SAVE-SOURCE-LOCATIONS* 966364)
(227F90E0) : 13 (FUNCALL (FUNCTION #<(:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM)>)) 757 NIL
CCL::ENV: #<CCL::LEXICAL-ENVIRONMENT #x210078855D> CCL::*NX-SOURCE-NOTE-MAP*: #<HASH-TABLE :TEST EQ size 242/347 #x21007884DD> CCL::*LOADING-TOPLEVEL-LOCATION*: #<SOURCE-NOTE "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp":4757-4779 "(test-defsystem :asdf)"> PRINT: NIL CCL::VAL: (ASDF-TEST::TEST-DEFSYSTEM :ASDF) CCL::EOF-VAL: (NIL) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"/976 UTF-8) #x210078903D>
(227F9168) : 14 (CALL-WITH-COMPILATION-UNIT #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x229209FF> :OVERRIDE NIL) 197 (CCL::THUNK &KEY :OVERRIDE) CCL::THUNK: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x229209FF> CCL::OVERRIDE: NIL
CCL::*OUTSTANDING-DEFERRED-WARNINGS*: #CCL::DEFERRED-WARNINGS #x210078863D
(227F91B0) : 15 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"/976 UTF-8) #x210078903D> NIL) 357 (STREAM PRINT) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"/976 UTF-8) #x210078903D> PRINT: NIL
CCL::EOF-VAL: (NIL) CCL::VAL: (ASDF-TEST::TEST-DEFSYSTEM :ASDF) #:WITH-COMPILATION-UNIT-BODY: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY
CCL::LOAD-FROM-STREAM) #x229209FF>
(227F91F0) : 16 (%LOAD
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" T NIL :ERROR :DEFAULT NIL) 5037 (CCL::FILE-NAME CCL::VERBOSE PRINT CCL::IF-DOES-NOT-EXIST CCL:EXTERNAL-FORMAT CCL::PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
CCL::SOURCE-FILE: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" *LOAD-PATHNAME*: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" *LOAD-TRUENAME*: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" *PACKAGE*: #<Package "ASDF-TEST"> *READTABLE*: #<READTABLE #x21002FDB5D> CCL::*LOADING-FILES*: (#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script") CCL:*LOADING-FILE-SOURCE-FILE*: "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" CCL::*LOADING-TOPLEVEL-LOCATION*: NIL #:G134914: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"/976 UTF-8) #x210078903D> #:G134915: NIL STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp"/976 UTF-8) #x210078903D>
(227F9348) : 17 (LOAD
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" :VERBOSE T :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT :PRESERVE-OPTIMIZATION-SETTINGS NIL) 1029 (CCL::FILE-NAME &KEY :VERBOSE :PRINT :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT :PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
#:LOAD-OTHER: #<RESTART CCL::LOAD-OTHER #x22920D2D> #:SKIP-LOAD: #<RESTART CCL::SKIP-LOAD #x22920CDD> #:RETRY-LOAD: #<RESTART CCL::RETRY-LOAD #x22920C8D> #:G134855: (#<RESTART CCL::RETRY-LOAD #x22920C8D> #<RESTART CCL::SKIP-LOAD #x22920CDD> #<RESTART CCL::LOAD-OTHER #x22920D2D>) CCL::%RESTARTS%: ((#<RESTART CCL::RETRY-LOAD #x22920C8D> #<RESTART CCL::SKIP-LOAD #x22920CDD> #<RESTART CCL::LOAD-OTHER #x22920D2D>) (#<RESTART CCL::RETRY-LOAD #x2292107D> #<RESTART CCL::SKIP-LOAD #x229210CD> #<RESTART CCL::LOAD-OTHER #x2292111D>) (#<RESTART CONTINUE #x229214ED>) (#<RESTART ABORT #x229215FD>) (#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>))
(227F93F8) : 18 (CALL-CHECK-REGS LOAD
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp") 221 (CCL::FN &REST CCL::ARGS) CCL::FN: LOAD CCL::ARGS: (#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/stamp-propagation/test-stamp-propagation.lisp")
CCL::OLD-REGS: (NIL (NIL) CCL:*SAVE-SOURCE-LOCATIONS* 966364)
(227F9430) : 19 (FUNCALL (FUNCTION #<(:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM)>)) 757 NIL
CCL::ENV: #<CCL::LEXICAL-ENVIRONMENT #x210078A0FD> CCL::*NX-SOURCE-NOTE-MAP*: #<HASH-TABLE :TEST EQ size 6/60 #x2100789B8D> CCL::*LOADING-TOPLEVEL-LOCATION*: #<SOURCE-NOTE "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script":0-85 "(load (subpathname *test-directory* "stamp-propagation/test-stamp-propagation.lisp"))"> PRINT: NIL CCL::VAL: (LOAD (UIOP/PATHNAME:SUBPATHNAME ASDF-TEST:*TEST-DIRECTORY* "stamp-propagation/test-stamp-propagation.lisp")) CCL::EOF-VAL: (NIL) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script"/1184 UTF-8) #x210078AB9D>
(227F94B8) : 20 (CALL-WITH-COMPILATION-UNIT #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x22920DEF> :OVERRIDE NIL) 197 (CCL::THUNK &KEY :OVERRIDE) CCL::THUNK: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM) #x22920DEF> CCL::OVERRIDE: NIL
CCL::*OUTSTANDING-DEFERRED-WARNINGS*: #CCL::DEFERRED-WARNINGS #x210078A1DD
(227F9500) : 21 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script"/1184 UTF-8) #x210078AB9D> NIL) 357 (STREAM PRINT) STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script"/1184 UTF-8) #x210078AB9D> PRINT: NIL
CCL::EOF-VAL: (NIL) CCL::VAL: (LOAD (UIOP/PATHNAME:SUBPATHNAME ASDF-TEST:*TEST-DIRECTORY* "stamp-propagation/test-stamp-propagation.lisp")) #:WITH-COMPILATION-UNIT-BODY: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
CCL::WITH-COMPILATION-UNIT-BODY
CCL::LOAD-FROM-STREAM) #x22920DEF>
(227F9540) : 22 (%LOAD
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script" T NIL :ERROR :DEFAULT NIL) 5037 (CCL::FILE-NAME CCL::VERBOSE PRINT CCL::IF-DOES-NOT-EXIST CCL:EXTERNAL-FORMAT CCL::PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
CCL::SOURCE-FILE: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script" *LOAD-PATHNAME*: #P"test-stamp-propagation.script" *LOAD-TRUENAME*: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script" *PACKAGE*: #<Package "ASDF-TEST"> *READTABLE*: #<READTABLE #x21002FDB5D> CCL::*LOADING-FILES*: (#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script") CCL:*LOADING-FILE-SOURCE-FILE*: "C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script" CCL::*LOADING-TOPLEVEL-LOCATION*: NIL #:G134914: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script"/1184 UTF-8) #x210078AB9D> #:G134915: NIL STREAM: #<BASIC-FILE-CHARACTER-INPUT-STREAM ("C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/test-stamp-propagation.script"/1184 UTF-8) #x210078AB9D>
(227F9698) : 23 (LOAD "test-stamp-propagation.script" :VERBOSE T :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT :PRESERVE-OPTIMIZATION-SETTINGS NIL) 1029 (CCL::FILE-NAME &KEY :VERBOSE :PRINT :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT :PRESERVE-OPTIMIZATION-SETTINGS) CCL::FILE-NAME: "test-stamp-propagation.script" CCL::VERBOSE: T PRINT: NIL CCL::IF-DOES-NOT-EXIST: :ERROR CCL:EXTERNAL-FORMAT: :DEFAULT CCL::PRESERVE-OPTIMIZATION-SETTINGS: NIL
#:LOAD-OTHER: #<RESTART CCL::LOAD-OTHER #x2292111D> #:SKIP-LOAD: #<RESTART CCL::SKIP-LOAD #x229210CD> #:RETRY-LOAD: #<RESTART CCL::RETRY-LOAD #x2292107D> #:G134855: (#<RESTART CCL::RETRY-LOAD #x2292107D> #<RESTART CCL::SKIP-LOAD #x229210CD> #<RESTART CCL::LOAD-OTHER #x2292111D>) CCL::%RESTARTS%: ((#<RESTART CCL::RETRY-LOAD #x2292107D> #<RESTART CCL::SKIP-LOAD #x229210CD> #<RESTART CCL::LOAD-OTHER #x2292111D>) (#<RESTART CONTINUE #x229214ED>) (#<RESTART ABORT #x229215FD>) (#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>))
(227F9748) : 24 (FUNCALL (FUNCTION #<Anonymous Function #x2100780B6F>)) 85 NIL
(227F9760) : 25 (CALL-WITH-ASDF-CACHE #<Anonymous Function #x2100780B6F> :OVERRIDE NIL) 301 (ASDF/CACHE::THUNK &KEY :OVERRIDE) ASDF/CACHE::THUNK: #<Anonymous Function #x2100780B6F> ASDF/CACHE::OVERRIDE: NIL
ASDF/CACHE:*ASDF-CACHE*: NIL
(227F97A8) : 26 (CALL-WITH-TEST #<Anonymous Function #x2100780B6F>) 325 (ASDF-TEST::THUNK) ASDF-TEST::THUNK: #<Anonymous Function #x2100780B6F>
#:G261: (ERROR #<Compiled-function # (Non-Global) #x21004574DF>) CCL::%HANDLERS%: ((ERROR #) (CCL:PROCESS-RESET))
(227F97E8) : 27 (CALL-CHECK-REGS ASDF-TEST::CALL-WITH-TEST #<Anonymous Function #x2100780B6F>) 221 (CCL::FN &REST CCL::ARGS) CCL::FN: ASDF-TEST::CALL-WITH-TEST CCL::ARGS: (#<Anonymous Function #x2100780B6F>)
CCL::OLD-REGS: (#. #<Compiled-function CCL::READ-EVAL #x1004FEC6F> # 966364)
(227F9820) : 28 (CHEAP-EVAL (ASDF-TEST:WITH-TEST NIL (LOAD #))) 101 (CCL::FORM) CCL::FORM: (ASDF-TEST:WITH-TEST NIL (LOAD #))
CCL::*NX-SOURCE-NOTE-MAP*: NIL
(227F9858) : 29 (READ-DISPATCH #<STRING-INPUT-STREAM #x21004383FD> ##) 757 (STREAM CHAR) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CHAR: ##
CCL::INFO: (#<Compiled-function CCL::READ-DISPATCH #x1004EFF1F> # # # # ...) CCL::TB: #("" 0 0 16 NIL) CCL::SUBCHAR: #. CCL::NUMARG: NIL CCL::DISPFUN: #<Compiled-function CCL::READ-EVAL #x1004FEC6F>
(227F98E0) : 30 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383FD> ## (NIL)) 597 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::FIRSTCHAR: ## CCL::DOT-OK: (NIL)
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 9 CCL::START-POS: 93 CCL::DEF: (#<Compiled-function CCL::READ-DISPATCH #x1004EFF1F> # # # # ...)
(227F9948) : 31 (%READ-LIST-EXPRESSION #<STRING-INPUT-STREAM #x21004383FD> (NIL) #)) 229 (STREAM CCL::DOT-OK &OPTIONAL CCL::TERMCH) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::DOT-OK: (NIL) CCL::TERMCH: #)
CCL::FIRSTCH: ##
(227F9998) : 32 (READ-LIST #<STRING-INPUT-STREAM #x21004383FD> NIL #)) 613 (STREAM &OPTIONAL CCL::NODOTS CCL::TERMCH) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::NODOTS: NIL CCL::TERMCH: #)
CCL::DOT-OK: (NIL) CCL::HEAD: (NIL
#P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/script-support.lisp" T T) CCL::TAIL: (T) CCL::SOURCE-NOTE-LIST: NIL CCL::FIRSTFORM: #P"C:/users/dcooper8/genworks/cl/tests/asdf/asdf/test/script-support.lisp" CCL::FIRSTFORM-P: T CCL::FIRSTFORM-SOURCE-NOTE: NIL
(227F9A18) : 33 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383FD> #( NIL) 469 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::FIRSTCHAR: #( CCL::DOT-OK: NIL
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 8 CCL::START-POS: 2 CCL::DEF: #<Anonymous Function #x1004E6A6F>
(227F9A78) : 34 (%READ-FORM #<STRING-INPUT-STREAM #x21004383FD> 0 NIL) 573 (STREAM CCL::ARG CCL::EOF-VAL) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::ARG: 0 CCL::EOF-VAL: NIL
CCL::CH: #(
(227F9AB8) : 35 (FUNCALL (FUNCTION #CCL::|'-reader|) #<STRING-INPUT-STREAM #x21004383FD> #') 77 (STREAM IGNORE) STREAM: #<STRING-INPUT-STREAM #x21004383FD> IGNORE: #'
(227F9AE0) : 36 (%PARSE-EXPRESSION #<STRING-INPUT-STREAM #x21004383FD> #' NIL) 469 (STREAM CCL::FIRSTCHAR CCL::DOT-OK) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::FIRSTCHAR: #' CCL::DOT-OK: NIL
READTABLE: #<READTABLE #x21002FDB5D> CCL::ATTRTAB: #<SPARSE-VECTOR 1114112 (UNSIGNED-BYTE 8) #x21002FDB8D> CCL::ATTR: 8 CCL::START-POS: 1 CCL::DEF: #<Compiled-function CCL::|'-reader| (Non-Global) #x1004E66BF>
(227F9B40) : 37 (%READ-FORM #<STRING-INPUT-STREAM #x21004383FD> 0 NIL) 573 (STREAM CCL::ARG CCL::EOF-VAL) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::ARG: 0 CCL::EOF-VAL: NIL
CCL::CH: #'
(227F9B80) : 38 (READ-INTERNAL #<STRING-INPUT-STREAM #x21004383FD> T NIL NIL) 253 (STREAM CCL::EOF-ERROR-P CCL::EOF-VALUE CCL::RECURSIVE-P) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::RECURSIVE-P: NIL
CCL::%READ-OBJECTS%: NIL CCL::%KEEP-WHITESPACE%: NIL
(227F9C00) : 39 (READ #<STRING-INPUT-STREAM #x21004383FD> T NIL NIL) 157 (&OPTIONAL STREAM CCL::EOF-ERROR-P CCL::EOF-VALUE CCL::RECURSIVE-P) STREAM: #<STRING-INPUT-STREAM #x21004383FD> CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::RECURSIVE-P: NIL
(227F9C50) : 40 (READ-FROM-STRING
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))" T NIL :START 0 :END NIL :PRESERVE-WHITESPACE NIL) 413 (STRING &OPTIONAL CCL::EOF-ERROR-P CCL::EOF-VALUE &KEY :START :END :PRESERVE-WHITESPACE) STRING: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))" CCL::EOF-ERROR-P: T CCL::EOF-VALUE: NIL CCL::START: 0 CCL::END: NIL CCL::PRESERVE-WHITESPACE: NIL
CCL::IDX: NIL STREAM: #<STRING-INPUT-STREAM #x21004383FD>
(227F9CF8) : 41 (FUNCALL (FUNCTION #<(:INTERNAL CCL::EVAL-STRING CCL::STARTUP-CCL)>)
"'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))") 445 (CCL::S) CCL::S: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))"
#:CONTINUE: #<RESTART CONTINUE #x229214ED> #:G140482: (#<RESTART CONTINUE #x229214ED>) CCL::%RESTARTS%: ((#<RESTART CONTINUE #x229214ED>) (#<RESTART ABORT #x229215FD>) (#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>))
(227F9D40) : 42 (STARTUP-CCL NIL) 1533 (&OPTIONAL CCL::INIT-FILE) CCL::INIT-FILE: NIL
#:ABORT: #<RESTART ABORT #x229215FD> #:G140470: (#<RESTART ABORT #x229215FD>) CCL::%RESTARTS%: ((#<RESTART ABORT #x229215FD>) (#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>)) #:G140475: ((:EVAL . "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))")) CCL::P: (:EVAL . "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))") CCL::PARAM: "'(#.(load(string'|script-support.lisp|))#.(asdf-test::load-asdf)#.(asdf-test::frob-packages)#.(asdf-test::with-test()(load(string'|test-stamp-propagation.script|))))" #:G140478: :EVAL
(227F9DA8) : 43 (FUNCALL (FUNCTION #<(:INTERNAL (CCL:TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>)) 61 NIL
CCL::F: CCL::LISTENER-FUNCTION CCL::INIT-FILE: "home:ccl-init"
(227F9DC8) : 44 (FUNCALL (FUNCTION #<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>)) 645 NIL
*TERMINAL-IO*: #<ECHOING-TWO-WAY-STREAM input #<BASIC-CHARACTER-INPUT-STREAM UTF-8 (PIPE/436) #x2100433B4D>, output #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> #x21004388DD> CCL::CLOSE-STREAMS: NIL CCL::CLEANUP-FUNCTION: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #x21004317DF> CCL::INITIAL-FUNCTION: #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #x210043178F> CCL::AUTO-FLUSH: T CCL:OUTPUT-STREAM: #<BASIC-CHARACTER-OUTPUT-STREAM UTF-8 (PIPE/624) #x210043364D> CCL:INPUT-STREAM: #<BASIC-CHARACTER-INPUT-STREAM UTF-8 (PIPE/436) #x2100433B4D> CCL::ECHOING: T
(227F9E60) : 45 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) [Active] #x21004312DD> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)) 669 (CCL:PROCESS CCL::INITIAL-FORM) CCL:PROCESS: #<TTY-LISTENER listener(1) [Active] #x21004312DD> CCL::INITIAL-FORM: (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)
CCL::EXITED: NIL #:G142760: (CCL:PROCESS-RESET) CCL::%HANDLERS%: ((CCL:PROCESS-RESET)) #:ABORT: #<RESTART ABORT #x2292186D> #:ABORT-BREAK: #<RESTART CCL:ABORT-BREAK #x2292181D> #:G142761: (#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>) CCL::%RESTARTS%: ((#<RESTART CCL:ABORT-BREAK #x2292181D> #<RESTART ABORT #x2292186D>))
(227F9EF0) : 46 (FUNCALL (FUNCTION #<(:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (CCL:PROCESS)))>) #<TTY-LISTENER listener(1) [Active] #x21004312DD> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)) 573 (CCL:PROCESS CCL::INITIAL-FORM) CCL:PROCESS: #<TTY-LISTENER listener(1) [Active] #x21004312DD> CCL::INITIAL-FORM: (#<CCL:COMPILED-LEXICAL-CLOSURE # #x2100430E0F>)
CCL:*CURRENT-PROCESS*: #<TTY-LISTENER listener(1) [Active] #x21004312DD> #:G142746: (*PRINT-PPRINT-DISPATCH* CCL::*FREE-XPS* CCL::*FREE-CIRCULARITY-HASH-TABLES* CCL::*LOGICAL-BLOCK-XP* CCL::*FORMAT-TOP-LEVEL* ...) #:G142747: (#<PPRINT-DISPATCH-TABLE #x21004390CD> NIL NIL NIL NIL ...) CCL::*INTERRUPT-LEVEL*: 0 #:G142748: ("Active") #:G142749: "Reset"
(227F9F98) : 47 (FUNCALL (FUNCTION #<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>)) 277 NIL
CCL::*CURRENT-LISP-THREAD*: #<LISP-THREAD listener [tcr @ #x75F6E0] #x2100430EED> CCL::INITIAL-FUNCTION: (#<Compiled-function # (Non-Global) #x10048AD7F> #<TTY-LISTENER listener(1) [Active] #x21004312DD> #) CCL::TCR: 966364 CCL::THREAD: #<LISP-THREAD listener [tcr @ #x75F6E0] #x2100430EED>
Above backtrace due to this condition: These two expressions fail comparison with EQUAL: (ASDF-TEST::SANITIZE-LOG (ASDF-TEST::RELOAD ASDF/DEFSYSTEM:DEFSYSTEM)) evaluates to ((:COMPILING :SYSTEM)) (QUOTE ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2))) evaluates to ((:COMPILING :SYSTEM) (:COMPILE-TOPLEVEL :FILE1) (:LOAD-TOPLEVEL :FILE1) (:COMPILE-TOPLEVEL :FILE2) (:LOAD-TOPLEVEL :FILE2)) Script failed Using f:/cl-engines/ccl-win-1.10-dev/wx86cl64.exe, test-stamp-propagation.script failed you can retry compilation with: ./test/run-tests.sh ccl test-stamp-propagation.script or more interactively (and maybe with rlwrap or in emacs), start with: (cd test ; f:/cl-engines/ccl-win-1.10-dev/wx86cl64.exe --no-init --quiet ) then copy/paste: '(#.(load "script-support.lisp") #.(asdf-test::da) #.(load-asdf) #.(frob-packages) #.(load "test-stamp-propagation.script"))