Looks like a bug in CMUCL. Sigh. Does it work better if all occurrences of (user-homedir-pathname) are replaced with (truename (user-homedir-pathname)) ?
[ François-René ÐVB Rideau | Reflection&Cybernethics | http://fare.tunes.org ] — Question authority! — Yeah, says who? On 5 April 2010 19:59, james anderson <james.ander...@setf.de> wrote: > good evening; > > an attempt to use asdf in cmucl to build alexandria fails in > connection with operations on a pathname designator which begins with > "home:". > > one observes, that it is not only commercial vendors who know what is > best for us. > > is cmu 20* expected to work with asdf 1.6*? > is there some this to configure to eliminate the problem? > > i have read about ext:clear-search-list, but its effect is somehow > not sufficient. > the problem persists even once (ext;search-list-defined-p "home:") > yields nil prior to compile-loading asdf. > > > a...@ip-10-251-122-82:/development/source/metadata/net/common-lisp/ > alexandria$ /development/bin/cmucl > CMU Common Lisp 20a (20A), running on ip-10-251-122-82 > With core: /development/downloads/cmucl-20a-non-unicode-x86-linux/lib/ > cmucl/lib/lisp-sse2.core > Dumped on: Mon, 2009-09-28 16:06:53Z on usrtc3154 > See <http://www.cons.org/cmucl/> for support information. > Loaded subsystems: > Python 1.1, target Intel x86 > CLOS based on Gerd's PCL 2008-11-12 16:36:41 > * (load (compile-file-pathname "/development/source/library/net/ > common-lisp/asdf/asdf.lisp")) > > ; Loading #P"/ebs/source/library/net/common-lisp/asdf/asdf.sse2f". > T > * asdf::*asdf-version* > > "1.661" > * (push #p"/development/source/upload/net/common-lisp/alexandria/" > asdf:*central-registry*) > > (#P"/development/source/upload/net/common-lisp/alexandria/") > * (asdf:load-system :alexandria) > > ; loading system definition from > ; /development/source/upload/net/common-lisp/alexandria/ > alexandria.asd into > ; #<The ASDF0 package> > ; Loading #P"/ebs/source/upload/net/common-lisp/alexandria/ > alexandria.asd". > ; registering #<SYSTEM :ALEXANDRIA {58B015CD}> as ALEXANDRIA > ; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. O C): > ; Compiling Top-Level Form: > ; [GC threshold exceeded with 12,008,296 bytes in use. Commencing GC.] > ; [GC completed with 1,578,760 bytes retained and 10,429,536 bytes > freed.] > ; [GC will next occur when at least 13,578,760 bytes are in use.] > ; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. O C): > ; Compiling Top-Level Form: > > Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER: > #<SEARCH-LIST home> is not of type (OR LISP::PATTERN > SYMBOL > SIMPLE-BASE-STRING > INTEGER) > [Condition of type TYPE-ERROR] > > Restarts: > 0: [ABORT] Return to Top-Level. > > Debug (type H for help) > > (LISP::COMPONENTS-MATCH 2 "ebs" #<SEARCH-LIST home>)[:EXTERNAL] > Source: Error finding source: > Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no > longer exists: > target:code/pathname.lisp. > 0] (logical-pathname-translations "HOME") > > File-error in function LISP::FIND-LOGICAL-HOST: > Logical host not yet defined: "HOME" > Error flushed ... > 0] (extensions:search-list "home:") > > (#P"/home/asdf/") > 0] :back > > 0: (LISP::COMPONENTS-MATCH 2 "ebs" #<SEARCH-LIST home>)[:EXTERNAL] > 1: (LISP::DIRECTORY-COMPONENTS-MATCH > ("ebs" "source" "upload" "net" "common-lisp" ...) > (#<SEARCH-LIST home> ".cache" "common-lisp" "cmu-20a__20a_-linux- > x86" > :WILD-INFERIORS)) > 2: (LISP::DIRECTORY-COMPONENTS-MATCH 2 > (:ABSOLUTE "ebs" "source" > "upload" "net" > ...) > (:ABSOLUTE #<SEARCH-LIST home> > ".cache" > "common-lisp" "cmu-20a__20a_- > linux-x86" > ...))[:EXTERNAL] > 3: (PATHNAME-MATCH-P > #P"/ebs/source/upload/net/common-lisp/alexandria/package.sse2f" > #P"home:.cache/common-lisp/cmu-20a__20a_-linux-x86/**/*.*") > 4: (ASDF:APPLY-OUTPUT-TRANSLATIONS > #P"/ebs/source/upload/net/common-lisp/alexandria/package.sse2f") > 5: ((METHOD ASDF:OUTPUT-FILES (:AROUND) (T T)) #<unused-arg> > #S(PCL::FAST-METHOD-CALL > :FUNCTION #<Function # {58CCC079}> > :PV-CELL (# . #) > :NEXT-METHOD-CALL #S(PCL::FAST-METHOD-CALL > :FUNCTION # > :PV-CELL NIL > :NEXT-METHOD-CALL NIL > :ARG-INFO #) > :ARG-INFO (2)) > #<ASDF:COMPILE-OP NIL {581EEBED}> > #<ASDF:CL-SOURCE-FILE "package" {58D08F9D}>) > 6: ((METHOD ASDF:OPERATION-DONE-P NIL (ASDF:OPERATION ASDF:COMPONENT)) > (#(7) . #(# #)) #<unused-arg> #<ASDF:COMPILE-OP NIL {581EEBED}> > #<ASDF:CL-SOURCE-FILE "package" {58D08F9D}>) > 7: ((METHOD ASDF::TRAVERSE NIL (ASDF:OPERATION ASDF:COMPONENT)) > (#(3 5 NIL NIL) . #(# # # # #)) #<unused-arg> > #<ASDF:COMPILE-OP NIL {581EEBED}> > #<ASDF:CL-SOURCE-FILE "package" {58D08F9D}>) > 8: ((METHOD ASDF::TRAVERSE NIL (ASDF:OPERATION ASDF:COMPONENT)) > (#(3 5 9 10) . #(# # # # #)) #<unused-arg> > #<ASDF:COMPILE-OP NIL {581EEBED}> #<ASDF:SYSTEM > "alexandria" {58C85305}>) > 9: ((LABELS ASDF::DO-ONE-DEP) ASDF:COMPILE-OP "alexandria" NIL) > 10: ((LABELS ASDF::DO-DEP) ASDF:COMPILE-OP ("alexandria")) > 11: ((METHOD ASDF::TRAVERSE NIL (ASDF:OPERATION ASDF:COMPONENT)) > (#(3 5 9 10) . #(# # # # #)) #<unused-arg> #<ASDF:LOAD-OP NIL > {58AF290D}> > #<ASDF:SYSTEM "alexandria" {58C85305}>) > 12: (ASDF:OPERATE ASDF:LOAD-OP :ALEXANDRIA) > 13: (INTERACTIVE-EVAL (ASDF:LOAD-SYSTEM :ALEXANDRIA)) > 14: (LISP::%TOP-LEVEL) > 15: ((LABELS LISP::RESTART-LISP SAVE-LISP)) > > 0] > > > _______________________________________________ > asdf-devel mailing list > asdf-devel@common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel > _______________________________________________ asdf-devel mailing list asdf-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel
