From: =?ISO-8859-1?Q?Far=E9?= fahree@gmail.com Date: Wed, 20 Jan 2010 14:30:48 -0500 Cc: Nick Levine ndl@ravenbrook.com, asdf-devel@common-lisp.net

If you actually send the backtrace on the list, or attach it to an ASDF bug on launchpad.net, that would help a lot figure out what's wrong and how to fix it.

Here it is. Note that the "extend stack by 50%" restart did the trick.

- nick

CL-USER 1 > (lisp-implementation-version) "5.1.2"

CL-USER 2 > (load #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/asdf/asdf.lisp") ; Loading text file c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/asdf/asdf.lisp"

CL-USER 3 > (pushnew #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/_asdf/" asdf:*central-registry* :test #'equal) (#P"c:/tmp/downloads/libcl-2010-01-18-snapshot/_asdf/" (DIRECTORY-NAMESTRING *DEFAULT-PATHNAME-DEFAULTS*))

CL-USER 4 > (asdf:operate 'asdf:load-op :asdf-binary-locations) ; loading system definition from C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\asdf-binary-locations.asd into ; #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading from #<STREAM::LATIN-1-FILE-STREAM C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\asdf-binary-locations.asd>. ; registering #<SYSTEM ASDF-BINARY-LOCATIONS 20101467> as ASDF-BINARY-LOCATIONS ; Loading text file C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp Warning: (DEFPARAMETER *CENTRALIZE-LISP-BINARIES*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *DEFAULT-TOPLEVEL-DIRECTORY*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *INCLUDE-PER-USER-INFORMATION*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *MAP-ALL-SOURCE-FILES*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFVAR *SOURCE-TO-TARGET-MAPPINGS*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *IMPLEMENTATION-FEATURES*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *OS-FEATURES*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *ARCHITECTURE-FEATURES*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFUN LISP-VERSION-STRING) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFPARAMETER *IMPLEMENTATION-SPECIFIC-DIRECTORY-NAME*) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFUN IMPLEMENTATION-SPECIFIC-DIRECTORY-NAME) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFUN PATHNAME-PREFIX-P) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFGENERIC OUTPUT-FILES-FOR-SYSTEM-AND-OPERATION) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFUN SOURCE-TO-TARGET-RESOLVED-MAPPINGS) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (METHOD OUTPUT-FILES-FOR-SYSTEM-AND-OPERATION (SYSTEM T T T T)) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (DEFGENERIC OUTPUT-FILES-USING-MAPPINGS) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (METHOD OUTPUT-FILES-USING-MAPPINGS (T T T)) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). Warning: (METHOD OUTPUT-FILES :AROUND (COMPILE-OP SOURCE-FILE)) being redefined in C:\tmp\downloads\libcl-2010-01-18-snapshot\asdf-binary-locations\dev\main.lisp (previously in c:\tmp\downloads\libcl-2010-01-18-snapshot\asdf\asdf.lisp). #<ASDF:LOAD-OP NIL 2141ED43>

CL-USER 5 > (load #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp") ; Loading text file c:\tmp\downloads\libcl-2010-01-18-snapshot\compile-libcl.lisp ; Loading text file c:\tmp\downloads\libcl-2010-01-18-snapshot\libcl-init\packages.lisp ; Loading from #<STREAM::LATIN-1-FILE-STREAM C:\tmp\downloads\libcl-2010-01-18-snapshot\alexandria\alexandria.asd>.

Stack overflow (stack size 15997). 1 (continue) Extend stack by 50%. 2 Extend stack by 300%. 3 Try loading c:\tmp\downloads\libcl-2010-01-18-snapshot\compile-libcl.lisp again. 4 Give up loading c:\tmp\downloads\libcl-2010-01-18-snapshot\compile-libcl.lisp. 5 Try loading another file instead of c:\tmp\downloads\libcl-2010-01-18-snapshot\compile-libcl.lisp. 6 (abort) Return to level 0. 7 Return to top loop level 0.

Type :b for backtrace, :c <option number> to proceed, or :? for other options

CL-USER 6 : 1 > :bb #<The COMMON-LISP-USER package, 9/16 internal, 0/4 external> #<MP:PROCESS Name "CAPI Execution Listener 1" Priority 0 State "Running">

Condition: Stack overflow (stack size 15997).

Call to SYSTEM::REAL-STACK-OVERFLOW (offset 848) SYSTEM::ERROR-ARGS : NIL

Call to RUNTIME:BAD-ARGS-OR-STACK (offset 76)

Call to ACONS (offset 51) SYSTEM::KEY : :DONT-KNOW SYSTEM::DATUM : :DONT-KNOW SYSTEM::ALIST : :DONT-KNOW

Interpreted call to anonymous (LAMBDA (DSPEC::%%MACROARG%% #:&ENVIRONMENT763 &AUX (#1=#:&WHOLE764 DSPEC::%%MACROARG%%) (#2=#:(TEST\ ...)765 (CDR #1#)) (#:CHECK-LAMBDA-LIST-TOP-LEVEL768 (DSPEC::CHECK-LAMBDA-LIST-TOP-LEVEL (QUOTE (ASDF::TEST ASDF::THEN &OPTIONAL ASDF::ELSE)) #1# #2# 2 3 (QUOTE NIL) :MACRO)) (ASDF::TEST (CAR (DSPEC::THE-CONS #2#))) (#3=#:(THEN\ ...)766 (CDR (DSPEC::THE-CONS #2#))) (ASDF::THEN (CAR (DSPEC::THE-CONS #3#))) (#4=#:(ELSE)767 (CDR (DSPEC::THE-CONS #3#))) (ASDF::ELSE (IF #4# (CAR (DSPEC::THE-CONS #4#)) NIL))) ...):

Block environment contour: (ASDF::OPERATION-ANCESTOR) ((METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION))) Tag environment contour: Function environment contour Variable environment contour: ((#:G880 . #1=#<ASDF:LOAD-OP NIL 2008E947>) (#:G879) (ASDF:OPERATION . #1#)) Call to FUNCALL (offset 25) FUNCTION : #<anonymous interpreted function 214B6EB2> SYSTEM::ARGUMENTS : ((ASDF::AIF (ASDF::OPERATION-PARENT ASDF:OPERATION) (ASDF::OPERATION-ANCESTOR ASDF::IT) ASDF:OPERATION) #<Augmented Environment venv (#<Venv 537931740 G880> #<Venv 537931648 G879> #<Venv 537931556 OPERATION>) fenv ((NEXT-METHOD-P . #<COMPILER::FLET-INFO #<interpreted function NEXT-METHOD-P 20102592>>) (CALL-NEXT-METHOD . #<COMPILER::FLET-INFO #<interpreted function CALL-NEXT-METHOD 20101922>>) (#:SOURCE-LEVEL-ENVIRONMENT-MARKER . #<COMPILER::FLET-INFO (NIL . #1=#<EQ Hash Table{13} 2147B9FB>)>) (#:FUNCTOR-MARKER . #<COMPILER::FLET-INFO (#2=(ASDF:OPERATION) (DECLARE (SYSTEM::SOURCE-LEVEL #1#) (LAMBDA-NAME #) (LAMBDA-LIST . #2#) (SYSTEM::FLAG :METHOD) (SYSTEM::BOUND-TYPE ASDF:OPERATION ASDF:OPERATION) (IGNORABLE ASDF:OPERATION)) (LET (#) (LET # #)))>)) benv NIL tenv NIL decl NIL>)

Call to SYSTEM::%EVAL-LIST-SYMBOL (offset 426) EXP : (ASDF::AIF (ASDF::OPERATION-PARENT ASDF:OPERATION) (ASDF::OPERATION-ANCESTOR ASDF::IT) ASDF:OPERATION)

Interpreted call to (METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION)): ASDF:OPERATION : #<ASDF:LOAD-OP NIL 2008E947> #:G879 : NIL #:G880 : #<ASDF:LOAD-OP NIL 2008E947>

Block environment contour: (ASDF::OPERATION-ANCESTOR) ((METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::IT . #<ASDF:LOAD-OP NIL 2008E947>) (#:G880 . #1=#<ASDF:COMPILE-OP NIL 200E3FFF>) (#:G879) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 38)

Interpreted call to (METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 200E3FFF> #:G879 : NIL #:G880 : #<ASDF:COMPILE-OP NIL 200E3FFF> ASDF::IT : #<ASDF:LOAD-OP NIL 2008E947>

Block environment contour: (ASDF::OPERATION-ANCESTOR) ((METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::IT . #<ASDF:COMPILE-OP NIL 200E3FFF>) (#:G880 . #1=#<ASDF:LOAD-OP NIL 200E5DBF>) (#:G879) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 38)

Interpreted call to (METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION)): ASDF:OPERATION : #<ASDF:LOAD-OP NIL 200E5DBF> #:G879 : NIL #:G880 : #<ASDF:LOAD-OP NIL 200E5DBF> ASDF::IT : #<ASDF:COMPILE-OP NIL 200E3FFF>

Block environment contour: (ASDF::OPERATION-ANCESTOR) ((METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::IT . #<ASDF:LOAD-OP NIL 200E5DBF>) (#:G880 . #1=#<ASDF:COMPILE-OP NIL 200FD903>) (#:G879) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 38)

Interpreted call to (METHOD ASDF::OPERATION-ANCESTOR (ASDF:OPERATION)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 200FD903> #:G879 : NIL #:G880 : #<ASDF:COMPILE-OP NIL 200FD903> ASDF::IT : #<ASDF:LOAD-OP NIL 200E5DBF>

Block environment contour: (ASDF::COMPONENT-VISITED-P) ((METHOD ASDF::COMPONENT-VISITED-P (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((#:G890 . #2=#<ASDF:COMPILE-OP NIL 200FD903>) (#:G891 . #1=#<ASDF:CL-SOURCE-FILE "strings" 200F4D6F>) (#:G889) (ASDF::C . #1#) (ASDF::O . #2#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 38)

Interpreted call to (METHOD ASDF::COMPONENT-VISITED-P (ASDF:OPERATION ASDF:COMPONENT)): ASDF::O : #<ASDF:COMPILE-OP NIL 200FD903> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G889 : NIL #:G891 : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G890 : #<ASDF:COMPILE-OP NIL 200FD903>

Block environment contour: (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::FORCED) (#:G944 . #2=#<ASDF:COMPILE-OP NIL 200FD903>) (#:G945 . #1=#<ASDF:CL-SOURCE-FILE "strings" 200F4D6F>) (#:G943) (ASDF::C . #1#) (ASDF:OPERATION . #2#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 200FD903> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G944 : #<ASDF:COMPILE-OP NIL 200FD903> ASDF::FORCED : NIL

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #<ASDF:COMPILE-OP NIL 200FD903>) (ASDF::DEP-C . #2=#<ASDF:CL-SOURCE-FILE #1="strings" 200F4D6F>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . #1#) (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #3=#<ASDF:LOAD-OP NIL 200E5DBF>) (#:G945 . #2#) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 200E5DBF> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> #:G944 : #<ASDF:LOAD-OP NIL 200E5DBF> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "strings" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:CL-SOURCE-FILE "strings" 200F4D6F> ASDF::OP : #<ASDF:COMPILE-OP NIL 200FD903>

Block environment contour: (#:G10985) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-10984| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G10989 . #1=(NIL)) (#:G10990 . #<anonymous interpreted function 200FBA7A>) (#:G10991 . #<anonymous interpreted function 200FBE7A>) (#:G10986 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . #2="strings") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:LOAD-OP NIL 200E5DBF>) (#:G945 . #3=#<ASDF:CL-SOURCE-FILE #2# 214DBE4B>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G944 : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "strings" ASDF::REQUIRED-V : NIL #:G10986 : (NIL) #:G10991 : #<anonymous interpreted function 214D33D2> #:G10990 : #<anonymous interpreted function 214D33BA> #:G10989 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214D9613>) (#<RESTART ASDF:RETRY 214E22DB>) (#<RESTART ASDF:RETRY 214B8103>) (#<RESTART ASDF:RETRY 214D8747>) (#<RESTART ASDF:RETRY 214DE247>) (#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 2008A54F> #<RESTART NIL 2008A4F7> #<RESTART NIL 2008A49F>) (#<RESTART ABORT 2008A43B>) (#<RESTART ABORT 2008A923>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G10981 (NIL) (WHEN (ENDP #1=#:|dolist-10980|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="strings") (#:|dolist-10980| . #2=(#1#)) (ASDF::DEP . #2#) (ASDF::OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:LOAD-OP NIL 214E1AE3>) (#:G945 . #3=#<ASDF:CL-SOURCE-FILE #1# 214DBE4B>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G944 : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::FORCED : NIL ASDF::OP : ASDF:COMPILE-OP ASDF::DEP : ("strings") #:|dolist-10980| : ("strings") ASDF::D : "strings"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-10968| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-10967| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-10971|)) (GO #6=#:|end-loop-10968|)) (LET ((#4=#:|temp-10974| (FUNCALL #:|by-10972| #1#)) (#2=#:|temp-10973| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-10975| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::DEPS #1="strings") (#:|tail-10971| (ASDF:LOAD-OP "package")) (#:|by-10972| . SYSTEM:CDR$CONS) (ASDF::FORCED) (#:G944 . #3=#<ASDF:LOAD-OP NIL 214E1AE3>) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE #1# 214DBE4B>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::C : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> #:G944 : #<ASDF:LOAD-OP NIL 214E1AE3> ASDF::FORCED : NIL #:|by-10972| : SYSTEM:CDR$CONS #:|tail-10971| : ((ASDF:LOAD-OP "package")) ASDF::DEPS : ("strings") ASDF::REQUIRED-OP : ASDF:COMPILE-OP

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #<ASDF:LOAD-OP NIL 214E1AE3>) (ASDF::DEP-C . #1=#<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "strings") (ASDF::REQUIRED-OP . ASDF:LOAD-OP) (ASDF::FORCED (#3=#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #1#) (ASDF::PRUNED-OP . #2=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #2#)) (#:G944 . #3#) (#:G945 . #4=#<ASDF:CL-SOURCE-FILE "macros" 214E5C7B>) (#:G943) (ASDF::C . #4#) (ASDF:OPERATION . #3#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : ((#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #1#)) ASDF::REQUIRED-OP : ASDF:LOAD-OP ASDF::REQUIRED-C : "strings" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B> ASDF::OP : #<ASDF:LOAD-OP NIL 214E1AE3>

Block environment contour: (#:G10952) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-10951| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G10956 . #1=(NIL)) (#:G10957 . #<anonymous interpreted function 214D31DA>) (#:G10958 . #<anonymous interpreted function 214D31F2>) (#:G10953 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "strings") (ASDF::REQUIRED-OP . ASDF:LOAD-OP) (ASDF::FORCED (#3=#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #2=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #2#)) (#:G944 . #3#) (#:G945 . #4=#<ASDF:CL-SOURCE-FILE "macros" 214E5C7B>) (#:G943) (ASDF::C . #4#) (ASDF:OPERATION . #3#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : ((#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #1#)) ASDF::REQUIRED-OP : ASDF:LOAD-OP ASDF::REQUIRED-C : "strings" ASDF::REQUIRED-V : NIL #:G10953 : (NIL) #:G10958 : #<anonymous interpreted function 214D31F2> #:G10957 : #<anonymous interpreted function 214D31DA> #:G10956 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214E22DB>) (#<RESTART ASDF:RETRY 214B8103>) (#<RESTART ASDF:RETRY 214D8747>) (#<RESTART ASDF:RETRY 214DE247>) (#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 214D00A3> #<RESTART NIL 214D00EF> #<RESTART NIL 214D013B>) (#<RESTART ABORT 214D0187>) (#<RESTART ABORT 214D001B>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G10936 (NIL) (WHEN (ENDP #1=#:|dolist-10935|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="strings") (#:|dolist-10935| . #2=(#1# "symbols")) (ASDF::DEP "package" . #2#) (ASDF::OP . ASDF:LOAD-OP) (ASDF::FORCED (#4=#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #3=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #3#)) (#:G944 . #4#) (#:G945 . #5=#<ASDF:CL-SOURCE-FILE "macros" 214E5C7B>) (#:G943) (ASDF::C . #5#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : ((#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #1#)) ASDF::OP : ASDF:LOAD-OP ASDF::DEP : ("package" "strings" "symbols") #:|dolist-10935| : ("strings" "symbols") ASDF::D : "strings"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-10923| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-10922| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-10926|)) (GO #6=#:|end-loop-10923|)) (LET ((#4=#:|temp-10929| (FUNCALL #:|by-10927| #1#)) (#2=#:|temp-10928| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-10930| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:LOAD-OP) (ASDF::DEPS . #1=("package" "strings" "symbols")) (#:|tail-10926|) (#:|by-10927| . SYSTEM:CDR$CONS) (ASDF::DO-FIRST (ASDF:LOAD-OP . #1#)) (ASDF::MODULE-OPS) (ASDF::FORCED (#3=#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #2=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #2#)) (#:G944 . #3#) (#:G945 . #4=#<ASDF:CL-SOURCE-FILE "macros" 214E5C7B>) (#:G943) (ASDF::C . #4#) (ASDF:OPERATION . #3#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : ((#<ASDF:COMPILE-OP NIL 214E2337> . #<ASDF:CL-SOURCE-FILE "symbols" 214E6017>) (ASDF::PRUNED-OP . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (ASDF::PRUNED-OP . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (ASDF::PRUNED-OP . #1#)) ASDF::MODULE-OPS : NIL ASDF::DO-FIRST : ((ASDF:LOAD-OP "package" "strings" "symbols")) #:|by-10927| : SYSTEM:CDR$CONS #:|tail-10926| : NIL ASDF::DEPS : ("package" "strings" "symbols") ASDF::REQUIRED-OP : ASDF:LOAD-OP

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #1=#<ASDF:COMPILE-OP NIL 214E2337>) (ASDF::DEP-C . #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "macros") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #1#) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "functions" 214DBE83>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "macros" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> ASDF::OP : #<ASDF:COMPILE-OP NIL 214E2337>

Block environment contour: (#:G10787) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-10786| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G10791 . #1=(NIL)) (#:G10792 . #<anonymous interpreted function 214B7802>) (#:G10793 . #<anonymous interpreted function 214B77EA>) (#:G10788 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "macros") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #3=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "functions" 214DBE83>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "macros" ASDF::REQUIRED-V : NIL #:G10788 : (NIL) #:G10793 : #<anonymous interpreted function 214B77EA> #:G10792 : #<anonymous interpreted function 214B7802> #:G10791 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214B8103>) (#<RESTART ASDF:RETRY 214D8747>) (#<RESTART ASDF:RETRY 214DE247>) (#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 214D00A3> #<RESTART NIL 214D00EF> #<RESTART NIL 214D013B>) (#<RESTART ABORT 214D0187>) (#<RESTART ABORT 214D001B>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G10783 (NIL) (WHEN (ENDP #1=#:|dolist-10782|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="macros") (#:|dolist-10782| . #2=(#1# "symbols" "package")) (ASDF::DEP . #2#) (ASDF::OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #3=#<ASDF:CL-SOURCE-FILE "functions" 214DBE83>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::OP : ASDF:COMPILE-OP ASDF::DEP : ("macros" "symbols" "package") #:|dolist-10782| : ("macros" "symbols" "package") ASDF::D : "macros"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-10770| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-10769| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-10773|)) (GO #6=#:|end-loop-10770|)) (LET ((#4=#:|temp-10776| (FUNCALL #:|by-10774| #1#)) (#2=#:|temp-10775| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-10777| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::DEPS "macros" "symbols" "package") (#:|tail-10773|) (#:|by-10774| . SYSTEM:CDR$CONS) (ASDF::FORCED) (#:G944 . #2=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #1=#<ASDF:CL-SOURCE-FILE "functions" 214DBE83>) (#:G943) (ASDF::C . #1#) (ASDF:OPERATION . #2#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL #:|by-10774| : SYSTEM:CDR$CONS #:|tail-10773| : NIL ASDF::DEPS : ("macros" "symbols" "package") ASDF::REQUIRED-OP : ASDF:COMPILE-OP

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #1=#<ASDF:COMPILE-OP NIL 214E2337>) (ASDF::DEP-C . #<ASDF:CL-SOURCE-FILE "functions" 214DBE83>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "functions") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #1#) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "lists" 214E8E37>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "functions" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> ASDF::OP : #<ASDF:COMPILE-OP NIL 214E2337>

Block environment contour: (#:G10754) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-10753| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G10758 . #1=(NIL)) (#:G10759 . #<anonymous interpreted function 214D3492>) (#:G10760 . #<anonymous interpreted function 214D34AA>) (#:G10755 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "functions") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #3=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "lists" 214E8E37>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "functions" ASDF::REQUIRED-V : NIL #:G10755 : (NIL) #:G10760 : #<anonymous interpreted function 214D34AA> #:G10759 : #<anonymous interpreted function 214D3492> #:G10758 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214D8747>) (#<RESTART ASDF:RETRY 214DE247>) (#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 214D00A3> #<RESTART NIL 214D00EF> #<RESTART NIL 214D013B>) (#<RESTART ABORT 214D0187>) (#<RESTART ABORT 214D001B>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G10750 (NIL) (WHEN (ENDP #1=#:|dolist-10749|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="functions") (#:|dolist-10749| . #2=(#1# "package")) (ASDF::DEP . #2#) (ASDF::OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #3=#<ASDF:CL-SOURCE-FILE "lists" 214E8E37>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::OP : ASDF:COMPILE-OP ASDF::DEP : ("functions" "package") #:|dolist-10749| : ("functions" "package") ASDF::D : "functions"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-10737| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-10736| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-10740|)) (GO #6=#:|end-loop-10737|)) (LET ((#4=#:|temp-10743| (FUNCALL #:|by-10741| #1#)) (#2=#:|temp-10742| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-10744| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::DEPS "functions" "package") (#:|tail-10740|) (#:|by-10741| . SYSTEM:CDR$CONS) (ASDF::FORCED) (#:G944 . #2=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #1=#<ASDF:CL-SOURCE-FILE "lists" 214E8E37>) (#:G943) (ASDF::C . #1#) (ASDF:OPERATION . #2#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL #:|by-10741| : SYSTEM:CDR$CONS #:|tail-10740| : NIL ASDF::DEPS : ("functions" "package") ASDF::REQUIRED-OP : ASDF:COMPILE-OP

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #1=#<ASDF:COMPILE-OP NIL 214E2337>) (ASDF::DEP-C . #<ASDF:CL-SOURCE-FILE "lists" 214E8E37>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "lists") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #1#) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "io" 214D5DAF>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #1#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "lists" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> ASDF::OP : #<ASDF:COMPILE-OP NIL 214E2337>

Block environment contour: (#:G10721) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-10720| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G10725 . #1=(NIL)) (#:G10726 . #<anonymous interpreted function 214D32B2>) (#:G10727 . #<anonymous interpreted function 214D32CA>) (#:G10722 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . "lists") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #3=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #2=#<ASDF:CL-SOURCE-FILE "io" 214D5DAF>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "lists" ASDF::REQUIRED-V : NIL #:G10722 : (NIL) #:G10727 : #<anonymous interpreted function 214D32CA> #:G10726 : #<anonymous interpreted function 214D32B2> #:G10725 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214DE247>) (#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 214D00A3> #<RESTART NIL 214D00EF> #<RESTART NIL 214D013B>) (#<RESTART ABORT 214D0187>) (#<RESTART ABORT 214D001B>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G10717 (NIL) (WHEN (ENDP #1=#:|dolist-10716|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="lists") (#:|dolist-10716| . #2=(#1# "macros" "package")) (ASDF::DEP . #2#) (ASDF::OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #3=#<ASDF:CL-SOURCE-FILE "io" 214D5DAF>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL ASDF::OP : ASDF:COMPILE-OP ASDF::DEP : ("lists" "macros" "package") #:|dolist-10716| : ("lists" "macros" "package") ASDF::D : "lists"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-10704| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-10703| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-10707|)) (GO #6=#:|end-loop-10704|)) (LET ((#4=#:|temp-10710| (FUNCALL #:|by-10708| #1#)) (#2=#:|temp-10709| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-10711| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::DEPS "lists" "macros" "package") (#:|tail-10707|) (#:|by-10708| . SYSTEM:CDR$CONS) (ASDF::FORCED) (#:G944 . #2=#<ASDF:COMPILE-OP NIL 214E2337>) (#:G945 . #1=#<ASDF:CL-SOURCE-FILE "io" 214D5DAF>) (#:G943) (ASDF::C . #1#) (ASDF:OPERATION . #2#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G943 : NIL #:G945 : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : NIL #:|by-10708| : SYSTEM:CDR$CONS #:|tail-10707| : NIL ASDF::DEPS : ("lists" "macros" "package") ASDF::REQUIRED-OP : ASDF:COMPILE-OP

Block environment contour: (#:G10691) (#:|normal-return|) (#:|error-return|) (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:G10693 (NIL) (RETURN-FROM #:G10691 (LET ((CONDITION #:G10692)) (DECLARE (IGNORABLE CONDITION)) (IF (EQ (ASDF::MODULE-IF-COMPONENT-DEP-FAILS ASDF::C) :FAIL) (ERROR CONDITION)) (SETF ERROR CONDITION)))) (#:|end-loop-9927| (NIL) (RETURN-FROM NIL NIL)) (#4=#:|begin-loop-9926| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-9930|)) (GO #5=#:|end-loop-9927|)) (LET ((#3=#:|temp-9933| (FUNCALL #:|by-9931| #1#)) (#2=#:|temp-9932| (SYSTEM:CAR$CONS #1#))) (SETQ ASDF::KID #2#) (SETQ #1# #3#))) (HANDLER-CASE (ASDF::APPENDF ASDF::FORCED (ASDF::TRAVERSE ASDF:OPERATION ASDF::KID)) (ASDF:MISSING-DEPENDENCY (CONDITION) (IF (EQ (ASDF::MODULE-IF-COMPONENT-DEP-FAILS ASDF::C) :FAIL) (ERROR CONDITION)) (SETF ERROR CONDITION)) (:NO-ERROR (ASDF::C) (DECLARE (IGNORE ASDF::C)) (SETF ASDF::AT-LEAST-ONE T))) (GO #4#) #5# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((CONDITIONS::*HANDLER-CLUSTERS* . #<Special Marker>) (#:G10694 . #<anonymous interpreted function 214D30D2>) (#:G10692) (ASDF::KID . #<ASDF:CL-SOURCE-FILE "io" 214D5DAF>) (#:|tail-9930| #<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #<ASDF:CL-SOURCE-FILE "control-flow" 214D7BCF> #<ASDF:CL-SOURCE-FILE "symbols" 214E6017> #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #<ASDF:CL-SOURCE-FILE "types" 214E40C7> #<ASDF:CL-SOURCE-FILE "arrays" 214D624B> #<ASDF:CL-SOURCE-FILE "sequences" 214E684F> #<ASDF:CL-SOURCE-FILE "numbers" 214DF68F> #<ASDF:CL-SOURCE-FILE "features" 214B850B>) (#:|by-9931| . SYSTEM:CDR$CONS) (ASDF::AT-LEAST-ONE . T) (ASDF::FORCED (#2=#<ASDF:COMPILE-OP NIL 214E2337> . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (#<ASDF:LOAD-OP NIL 21492DAF> . #1#) (#2# . #<ASDF:CL-SOURCE-FILE "definitions" 214D5E17>) (#2# . #<ASDF:CL-SOURCE-FILE "binding" 214E5E57>) (#2# . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (#2# . #<ASDF:CL-SOURCE-FILE "conditions" 214E8F67>) (#2# . #<ASDF:CL-SOURCE-FILE "hash-tables" 214E454B>)) (ERROR) (ASDF::FORCED) (#:G944 . #2#) (#:G945 . #3=#<ASDF:SYSTEM "alexandria" 214EAB03>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #2#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::C : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G943 : NIL #:G945 : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G944 : #<ASDF:COMPILE-OP NIL 214E2337> ASDF::FORCED : ((#2=#<ASDF:COMPILE-OP NIL 214E2337> . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (#<ASDF:LOAD-OP NIL 21492DAF> . #1#) (#2# . #<ASDF:CL-SOURCE-FILE "definitions" 214D5E17>) (#2# . #<ASDF:CL-SOURCE-FILE "binding" 214E5E57>) (#2# . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (#2# . #<ASDF:CL-SOURCE-FILE "conditions" 214E8F67>) (#2# . #<ASDF:CL-SOURCE-FILE "hash-tables" 214E454B>)) ERROR : NIL ASDF::FORCED : ((#2=#<ASDF:COMPILE-OP NIL 214E2337> . #1=#<ASDF:CL-SOURCE-FILE "package" 214E3A0B>) (#<ASDF:LOAD-OP NIL 21492DAF> . #1#) (#2# . #<ASDF:CL-SOURCE-FILE "definitions" 214D5E17>) (#2# . #<ASDF:CL-SOURCE-FILE "binding" 214E5E57>) (#2# . #<ASDF:CL-SOURCE-FILE "strings" 214DBE4B>) (#2# . #<ASDF:CL-SOURCE-FILE "conditions" 214E8F67>) (#2# . #<ASDF:CL-SOURCE-FILE "hash-tables" 214E454B>)) ASDF::AT-LEAST-ONE : T #:|by-9931| : SYSTEM:CDR$CONS #:|tail-9930| : (#<ASDF:CL-SOURCE-FILE "macros" 214E5C7B> #<ASDF:CL-SOURCE-FILE "control-flow" 214D7BCF> #<ASDF:CL-SOURCE-FILE "symbols" 214E6017> #<ASDF:CL-SOURCE-FILE "functions" 214DBE83> #<ASDF:CL-SOURCE-FILE "lists" 214E8E37> #<ASDF:CL-SOURCE-FILE "types" 214E40C7> #<ASDF:CL-SOURCE-FILE "arrays" 214D624B> #<ASDF:CL-SOURCE-FILE "sequences" 214E684F> #<ASDF:CL-SOURCE-FILE "numbers" 214DF68F> #<ASDF:CL-SOURCE-FILE "features" 214B850B>) ASDF::KID : #<ASDF:CL-SOURCE-FILE "io" 214D5DAF> #:G10692 : NIL #:G10694 : #<anonymous interpreted function 214D30D2> CONDITIONS::*HANDLER-CLUSTERS* : (((ASDF:MISSING-DEPENDENCY . #<anonymous interpreted function 214D30D2>)) ((ASDF:COMPILE-FAILED . #<anonymous interpreted function 214927E2>)) ((ERROR . #<Closure (CAPI::INTERACTIVE-PANE-TOP-LOOP . 1) 216C8F8A>)))

Block environment contour: (ASDF::%DO-ONE-DEP) (ASDF::%DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: Function environment contour Variable environment contour: ((ASDF::OP . #<ASDF:COMPILE-OP NIL 214E2337>) (ASDF::DEP-C . #2=#<ASDF:SYSTEM #1="alexandria" 214EAB03>) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . #1#) (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #3=#<ASDF:LOAD-OP NIL 214B8EC3>) (#:G945 . #2#) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF::%DO-ONE-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::C : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G943 : NIL #:G945 : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G944 : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "alexandria" ASDF::REQUIRED-V : NIL ASDF::DEP-C : #<ASDF:SYSTEM "alexandria" 214EAB03> ASDF::OP : #<ASDF:COMPILE-OP NIL 214E2337>

Block environment contour: (#:G9692) (NIL) (ASDF::DO-ONE-DEP) (ASDF::DO-ONE-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#1=#:|loop-9691| (NIL) (RESTART-CASE (RETURN (ASDF::%DO-ONE-DEP ASDF::REQUIRED-OP ASDF::REQUIRED-C ASDF::REQUIRED-V)) (ASDF:RETRY NIL :REPORT (LAMBDA (ASDF::S) (FORMAT ASDF::S "~@<Retry loading component ~S.~@:>" ASDF::REQUIRED-C)) :TEST (LAMBDA (ASDF::C) (AND (TYPEP ASDF::C (QUOTE ASDF:MISSING-DEPENDENCY)) (EQUALP (ASDF::MISSING-REQUIRES ASDF::C) ASDF::REQUIRED-C))))) (GO #1#)) Function environment contour Variable environment contour: ((CONDITIONS::*RESTART-CLUSTERS* . #<Special Marker>) (#:G9696 . #1=(NIL)) (#:G9697 . #<anonymous interpreted function 214D3012>) (#:G9698 . #<anonymous interpreted function 214D2FFA>) (#:G9693 . #1#) (ASDF::REQUIRED-V) (ASDF::REQUIRED-C . #2="alexandria") (ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:LOAD-OP NIL 214B8EC3>) (#:G945 . #3=#<ASDF:SYSTEM #2# 214EAB03>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-ONE-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::C : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G943 : NIL #:G945 : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G944 : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::FORCED : NIL ASDF::REQUIRED-OP : ASDF:COMPILE-OP ASDF::REQUIRED-C : "alexandria" ASDF::REQUIRED-V : NIL #:G9693 : (NIL) #:G9698 : #<anonymous interpreted function 214D2FFA> #:G9697 : #<anonymous interpreted function 214D3012> #:G9696 : (NIL) CONDITIONS::*RESTART-CLUSTERS* : ((#<RESTART ASDF:RETRY 214E6653>) (#<RESTART NIL 214D00A3> #<RESTART NIL 214D00EF> #<RESTART NIL 214D013B>) (#<RESTART ABORT 214D0187>) (#<RESTART ABORT 214D001B>) (#<RESTART ABORT 215703FF>))

Block environment contour: (NIL) (ASDF::DO-DEP) (ASDF::DO-DEP) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#2=#:G9688 (NIL) (WHEN (ENDP #1=#:|dolist-9687|) (RETURN-FROM NIL NIL)) (LET ((ASDF::D (CAR (COMPILER::INTERNAL-THE CONS #1#)))) (DECLARE (IGNORABLE ASDF::D)) (TAGBODY (COND ((CONSP ASDF::D) (COND ((STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "VERSION") (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) ((AND (STRING-EQUAL (SYMBOL-NAME (FIRST ASDF::D)) "FEATURE") (FIND (SECOND ASDF::D) *FEATURES* :TEST (QUOTE STRING-EQUAL))) (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP (SECOND ASDF::D) (THIRD ASDF::D)))) (T (ERROR "Bad dependency ~a. Dependencies must be (:version <version>), (:feature <feature>), or a name" ASDF::D)))) (T (ASDF::APPENDF ASDF::FORCED (ASDF::DO-ONE-DEP ASDF::OP ASDF::D NIL)))))) (SETQ #1# (CDR (COMPILER::INTERNAL-THE CONS #1#))) (GO #2#)) Function environment contour Variable environment contour: ((ASDF::D . #1="alexandria") (#:|dolist-9687| . #2=(#1#)) (ASDF::DEP . #2#) (ASDF::OP . ASDF:COMPILE-OP) (ASDF::FORCED) (#:G944 . #4=#<ASDF:LOAD-OP NIL 214B8EC3>) (#:G945 . #3=#<ASDF:SYSTEM #1# 214EAB03>) (#:G943) (ASDF::C . #3#) (ASDF:OPERATION . #4#)) Interpreted call to ASDF::DO-DEP: ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::C : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G943 : NIL #:G945 : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G944 : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::FORCED : NIL ASDF::OP : ASDF:COMPILE-OP ASDF::DEP : ("alexandria") #:|dolist-9687| : ("alexandria") ASDF::D : "alexandria"

Block environment contour: (NIL) (ASDF::TRAVERSE) ((METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT))) Tag environment contour: (#:|end-loop-9675| (NIL) (RETURN-FROM NIL NIL)) (#5=#:|begin-loop-9674| (NIL) (PROGN (WHEN (OR (ENDP #1=#:|tail-9678|)) (GO #6=#:|end-loop-9675|)) (LET ((#4=#:|temp-9681| (FUNCALL #:|by-9679| #1#)) (#2=#:|temp-9680| (SYSTEM:CAR$CONS #1#))) (LET ((#3=#:|destructor-9682| #2#)) (SETQ ASDF::REQUIRED-OP (CAR #3#)) (SETQ ASDF::DEPS (CDR #3#))) (SETQ #1# #4#))) (ASDF::DO-DEP ASDF::REQUIRED-OP ASDF::DEPS) (GO #5#) #6# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((ASDF::REQUIRED-OP . ASDF:COMPILE-OP) (ASDF::DEPS #1="alexandria") (#:|tail-9678|) (#:|by-9679| . SYSTEM:CDR$CONS) (ASDF::FORCED) (#:G944 . #3=#<ASDF:LOAD-OP NIL 214B8EC3>) (#:G945 . #2=#<ASDF:SYSTEM #1# 214EAB03>) (#:G943) (ASDF::C . #2#) (ASDF:OPERATION . #3#)) Interpreted call to (METHOD ASDF::TRAVERSE (ASDF:OPERATION ASDF:COMPONENT)): ASDF:OPERATION : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::C : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G943 : NIL #:G945 : #<ASDF:SYSTEM "alexandria" 214EAB03> #:G944 : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::FORCED : NIL #:|by-9679| : SYSTEM:CDR$CONS #:|tail-9678| : NIL ASDF::DEPS : ("alexandria") ASDF::REQUIRED-OP : ASDF:COMPILE-OP

Block environment contour: (ASDF:OPERATE) Tag environment contour: Function environment contour Variable environment contour: ((ASDF:SYSTEM . #<ASDF:SYSTEM "alexandria" 214EAB03>) (ASDF::*VERBOSE-OUT* . #1=#<Special Marker>) (ASDF::OP . #<ASDF:LOAD-OP NIL 214B8EC3>) (*READTABLE* . #1#) (*PACKAGE* . #1#) (ASDF::FORCE) (ASDF:VERSION) (ASDF::VERBOSE . T) (ASDF::ARGS) (ASDF:SYSTEM . :ALEXANDRIA) (ASDF::OPERATION-CLASS . ASDF:LOAD-OP)) Binding frame: CLOS::*NEXT-METHODS* : NIL

Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 41)

Interpreted call to ASDF:OPERATE: ASDF::OPERATION-CLASS : ASDF:LOAD-OP ASDF:SYSTEM : #<ASDF:SYSTEM "alexandria" 214EAB03> ASDF::ARGS : NIL ASDF::VERBOSE : T ASDF:VERSION : NIL ASDF::FORCE : NIL *PACKAGE* : #<The COMMON-LISP-USER package, 9/16 internal, 0/4 external> *READTABLE* : #<READTABLE 2054A56B> ASDF::OP : #<ASDF:LOAD-OP NIL 214B8EC3> ASDF::*VERBOSE-OUT* : #<EDITOR::RUBBER-STREAM #<EDITOR:BUFFER CAPI interactive-pane 2> 21574F1F> ASDF:SYSTEM : #<ASDF:SYSTEM "alexandria" 214EAB03>

Block environment contour: (LIBCL-UTIL::DO-COMPILE) Tag environment contour: Function environment contour Variable environment contour: ((CONDITIONS::*HANDLER-CLUSTERS* . #<Special Marker>) (#:G9461 . #<anonymous interpreted function 214927E2>) (LIBCL-UTIL::PROBLEM) (LIBCL-UTIL::MISSING-DEPS) (PACKAGE . :ALEXANDRIA) (LIBCL-UTIL::LOAD-UNLESS) (LIBCL-UTIL::LIBCL-PACKAGE . #S(LIBCL-UTIL::LIBCL-PACKAGE :NAME "Alexandria" :WEBPAGE "http://common-lisp.net/project/alexandria/" :LICENSE :PD :SHORT-DESC "portable CL utilities" :DOCPATH "alexandria/doc/alexandria.html" :PROVIDES :ALEXANDRIA :LOAD-UNLESS NIL :VERSION "20090324+"))) Interpreted call to LIBCL-UTIL::DO-COMPILE: LIBCL-UTIL::LIBCL-PACKAGE : #S(LIBCL-UTIL::LIBCL-PACKAGE :NAME "Alexandria" :WEBPAGE "http://common-lisp.net/project/alexandria/" :LICENSE :PD :SHORT-DESC "portable CL utilities" :DOCPATH "alexandria/doc/alexandria.html" :PROVIDES :ALEXANDRIA :LOAD-UNLESS NIL :VERSION "20090324+") LIBCL-UTIL::LOAD-UNLESS : NIL PACKAGE : :ALEXANDRIA LIBCL-UTIL::MISSING-DEPS : NIL LIBCL-UTIL::PROBLEM : NIL #:G9461 : #<anonymous interpreted function 214927E2> CONDITIONS::*HANDLER-CLUSTERS* : (((ASDF:COMPILE-FAILED . #<anonymous interpreted function 214927E2>)) ((ERROR . #<Closure (CAPI::INTERACTIVE-PANE-TOP-LOOP . 1) 216C8F8A>)))

Block environment contour: (NIL) (LIBCL-UTIL::COMPILE-ALL) Tag environment contour: (#:|end-loop-4740| (NIL) (RETURN-FROM NIL NIL)) (#2=#:|begin-loop-4739| (NIL) (PROGN (LET ((#1=#:|temp-4743| (READ LIBCL-UTIL::FILE NIL NIL))) (SETQ LIBCL-UTIL::P #1#))) (UNLESS LIBCL-UTIL::P (GO #3=#:|end-loop-4740|)) (LIBCL-UTIL::DO-COMPILE (LIBCL-UTIL::FIND-LIBCL-PACKAGE LIBCL-UTIL::P)) (GO #2#) #3# (RETURN-FROM NIL NIL)) Function environment contour Variable environment contour: ((LIBCL-UTIL::P . :ALEXANDRIA) (LIBCL-UTIL::FILE . #1=#<STREAM::LATIN-1-FILE-STREAM c:\tmp\downloads\libcl-2010-01-18-snapshot\packages.txt>) (#:INTERNAL-STREAM4735 . #1#) (#:DELETE4736 . T) (LIBCL-UTIL::PACK-FILE . #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/packages.txt")) Interpreted call to LIBCL-UTIL::COMPILE-ALL: LIBCL-UTIL::PACK-FILE : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/packages.txt" #:DELETE4736 : T #:INTERNAL-STREAM4735 : #<STREAM::LATIN-1-FILE-STREAM c:\tmp\downloads\libcl-2010-01-18-snapshot\packages.txt> LIBCL-UTIL::FILE : #<STREAM::LATIN-1-FILE-STREAM c:\tmp\downloads\libcl-2010-01-18-snapshot\packages.txt> LIBCL-UTIL::P : :ALEXANDRIA

Block environment contour: Tag environment contour: Function environment contour Variable environment contour: () Call to SYSTEM::%INVOKE (offset 396)

Call to SYSTEM::%EVAL (offset 107) EXP : (LIBCL-UTIL::COMPILE-ALL (MERGE-PATHNAMES "packages.txt" *LOAD-TRUENAME*))

Call to SYSTEM::EVAL-AS-PROGN (offset 86) SYSTEM::X : ((LIBCL-UTIL::COMPILE-ALL (MERGE-PATHNAMES "packages.txt" *LOAD-TRUENAME*)) (LIBCL-UTIL::PRINT-SUMMARY T) (LET* ((FILENAME (CONCATENATE (QUOTE STRING) (ASDF:IMPLEMENTATION-SPECIFIC-DIRECTORY-NAME) ".txt")) (PATH (MERGE-PATHNAMES FILENAME *LOAD-TRUENAME*))) (WITH-OPEN-FILE (LOG PATH :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (LIBCL-UTIL::PRINT-SUMMARY LOG)) (FORMAT T "Summary saved to ~A" (TRUENAME PATH))))

Call to SYSTEM::%EVAL (offset 107) EXP : (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (LIBCL-UTIL::COMPILE-ALL (MERGE-PATHNAMES "packages.txt" *LOAD-TRUENAME*)) (LIBCL-UTIL::PRINT-SUMMARY T) (LET* ((FILENAME (CONCATENATE (QUOTE STRING) (ASDF:IMPLEMENTATION-SPECIFIC-DIRECTORY-NAME) ".txt")) (PATH (MERGE-PATHNAMES FILENAME *LOAD-TRUENAME*))) (WITH-OPEN-FILE (LOG PATH :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (LIBCL-UTIL::PRINT-SUMMARY LOG)) (FORMAT T "Summary saved to ~A" (TRUENAME PATH))))

Tag environment contour: Block environment contour: Function environment contour Variable environment contour: () Call to EVAL (offset 113) EXP : (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (LIBCL-UTIL::COMPILE-ALL (MERGE-PATHNAMES "packages.txt" *LOAD-TRUENAME*)) (LIBCL-UTIL::PRINT-SUMMARY T) (LET* ((FILENAME (CONCATENATE (QUOTE STRING) (ASDF:IMPLEMENTATION-SPECIFIC-DIRECTORY-NAME) ".txt")) (PATH (MERGE-PATHNAMES FILENAME *LOAD-TRUENAME*))) (WITH-OPEN-FILE (LOG PATH :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (LIBCL-UTIL::PRINT-SUMMARY LOG)) (FORMAT T "Summary saved to ~A" (TRUENAME PATH))))

Binding frame: COMPILER::*SOURCE-LEVEL-FORM-TABLE* : NIL

Binding frame: SYSTEM::*LAST-FORM-READ* : #<Unbound Marker>

Catch frame: SYSTEM::LOAD-TEXT-STREAM

Call to SYSTEM::LOAD-TEXT-STREAM (offset 347) STREAM : #<STREAM::LATIN-1-FILE-STREAM c:\tmp\downloads\libcl-2010-01-18-snapshot\compile-libcl.lisp> SYSTEM::EVAL-FUNCTION : SYSTEM:TOP-LEVEL-EVAL PRINT : NIL SYSTEM::PRINT-FUNCTION : #<Function IDENTITY 202902AA> SYSTEM::EXIT-LOAD-P : NIL

Binding frame: SYSTEM:*CURRENT-PATHNAME* : NIL

Binding frame: *LOAD-TRUENAME* : NIL

Catch frame: #<Unbound Marker>

Call to SYSTEM::LOAD-TEXT-FILE (offset 281) PATHNAME : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp" SYSTEM::VERBOSE : T PRINT : NIL SYSTEM::EXT-FORMAT : :DEFAULT

Catch frame: LOAD

Call to SYSTEM::TRY-TO-LOAD (offset 299) PATHNAME : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp" SYSTEM::IS-FASL : NIL SYSTEM::VERBOSE : T PRINT : NIL SYSTEM::EXT-FORMAT : :DEFAULT

Binding frame: DSPEC::*LOCATION* : :LISTENER DSPEC::*LOCATION-DEFS* : NIL

Binding frame: *PACKAGE* : #<The COMMON-LISP-USER package, 9/16 internal, 0/4 external> *READTABLE* : #<READTABLE 2054A56B> SYSTEM::*LOAD-LEVEL* : -1

Catch frame: #<Unbound Marker>

Binding frame: DSPEC:*SOURCE-PATHNAME* : NIL

Call to (SUBFUNCTION 1 LOAD) (offset 285) PACKAGE {Closed} : #<The COMMON-LISP-USER package, 9/16 internal, 0/4 external> PRINT {Closed} : NIL SYSTEM::IS-FASL {Closed} : NIL PATHNAME {Closed} : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp" SYSTEM::VERBOSE {Closed} : T SYSTEM::EXTERNAL-FORMAT {Closed} : :DEFAULT SYSTEM::IN-STATIC {Closed} : NIL

Catch frame: (NIL)

Catch frame: (NIL)

Call to SYSTEM::LOAD-FILE-WITH-RESTARTS (offset 358) SYSTEM::LOADER : #<Closure (LOAD . 1) 2149273A> SYSTEM::FILENAME : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp" SYSTEM::IF-DOES-NOT-EXIST : T

Binding frame: *LOAD-PATHNAME* : NIL

Catch frame: SYSTEM::EXIT-LOAD-CATCH

Catch frame: #<Unbound Marker>

Binding frame: SYSTEM::*LOAD-FASL-DATA* : NIL

Call to LOAD (offset 1285) SYSTEM::FILENAME : #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp" SYSTEM::VERBOSE : T PACKAGE {Closing} : #<The COMMON-LISP-USER package, 9/16 internal, 0/4 external> PRINT : NIL SYSTEM::IF-DOES-NOT-EXIST : T SYSTEM::EXTERNAL-FORMAT : :DEFAULT SYSTEM::SOURCE-PATHNAME : NIL SYSTEM::*LOAD-FASL-DATA* {Special} : NIL

Call to SYSTEM::%INVOKE (offset 396)

Call to SYSTEM::%EVAL (offset 107) EXP : (LOAD #P"c:/tmp/downloads/libcl-2010-01-18-snapshot/compile-libcl.lisp")

SYSTEM::%EVAL <- EVAL <- SYSTEM::DO-EVALUATION <- SYSTEM::%TOP-LEVEL-INTERNAL <- SYSTEM::%TOP-LEVEL <- SYSTEM::LISTENER-TOP-LEVEL <- CAPI::CAPI-TOP-LEVEL-FUNCTION <- CAPI::INTERACTIVE-PANE-TOP-LOOP <- (SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS-STACK) <- SYSTEM::%%FIRST-CALL-TO-STACK T

CL-USER 7 : 1 > :c ; extend stack by 50% -- succeeds ;;; Compiling file C:\tmp\downloads\libcl-2010-01-18-snapshot\alexandria\package.lisp ... ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0 ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3 ;;; Source level debugging is on ;;; Source file recording is on ;;; Cross referencing is on ; (TOP-LEVEL-FORM 0) ; (DEFPACKAGE "ALEXANDRIA.0.DEV") ; (TOP-LEVEL-FORM 0) ; Loading fasl file C:\tmp\downloads\libcl-2010-01-18-snapshot\alexandria\lispworks-5.1.2-mswindows-i386\package.ofasl ;;; Compiling file C:\tmp\downloads\libcl-2010-01-18-snapshot\alexandria\definitions.lisp ... [etc etc]

Your backtrace shows nothing obviously wrong, and if extending the stack does the trick, the problem is possibly that LW starts with an extremely small stack and/or does some stack-allocation optimizations that blow the little stack it has. I blame LW settings (did you override the defaults?)

I haven't overridden anything. For some reason I've never understood LW has a small default stack size.

By the way, this is ASDF revision 1.375. LW 5.1 has been fine interpreted with other (earlier) revisions.

- n

Francois,

Maybe you need to override the default.

In the context of libcl (which is where I came in, testing a release candidate with LW 5.1.2), overriding the default stack size default needs resaving the image and isn't an option.

I suggest you take that with the tech support of your vendor.

I don't know if there's much mileage in that. They'll surely tell me to either run asdf compiled or to use the latest release (LW6) or both.

If you feel that ASDF needs to be changed in any specific way, please do not hesitate to come back to this list, or to post a bug on launchpad.net.

If you think it's an ASDF issue, it would be nice if you could git-bisect a specific commit that causes the issue.

I lean more towards proposing to libcl that asdf is run compiled rather than interpreted.

- nick

Daniel,

Date: Wed, 20 Jan 2010 20:55:22 -0500 (EST) From: Daniel Herring dherring@tentpost.com

Note that this release of asdf has asdf-binary-locations built in. Thus it does not need to be loaded separately (input 4 below). Instead, load ASDF then (setf asdf:*enable-asdf-binary-locations* t).

Noted. (I guess that as far as libcl goes, the configuration instructions should be modified to reflect this.)

If you clear the asdf fasl and restart LW, does that work without blowing the stack?

No, for LW 5.1.2 it does not.

- nick