asdf-devel April 2010

asdf-devel@common-lisp.net

13 participants
33 discussions

[asdf-devel] translate-jar-pathname : The value NIL is not of type (OR PATHNAME STRING FILE-STREAM).
by james anderson 01 May '10

01 May '10

given: [1] CL-USER(69): (lisp-implementation-type) "Armed Bear Common Lisp" [2] CL-USER(70): (lisp-implementation-version) "0.19.1" [3] CL-USER(73): asdf::*asdf-version* "1.666" asdf fails to compile alexandria. translate-jar-pathname applies namestring to the null device component of a pathname and fails. CL-USER(68): (asdf:load-system :bordeaux-threads) 0: (ASDF-UTILITIES:COERCE-NAME :BORDEAUX-THREADS) 0: COERCE-NAME returned "bordeaux-threads" 0: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 0: COERCE-NAME returned "bordeaux-threads" 0: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 0: COERCE-NAME returned "bordeaux-threads" 0: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 0: COERCE-NAME returned "bordeaux-threads" 0: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 0: COERCE-NAME returned "bordeaux-threads" 0: (ASDF::TRAVERSE #<ASDF:LOAD-OP {CF5006}> #<ASDF:SYSTEM {1F7DBD8}>) 1: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1F7DBD8}>) 1: COMPONENT-PARENT returned NIL 1: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 1: COERCE-NAME returned "bordeaux-threads" 1: (ASDF:FIND-COMPONENT NIL "bordeaux-threads" NIL) 2: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 2: COERCE-NAME returned "bordeaux-threads" 2: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 2: COERCE-NAME returned "bordeaux-threads" 2: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 2: COERCE-NAME returned "bordeaux-threads" 2: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 2: COERCE-NAME returned "bordeaux-threads" 2: (ASDF-UTILITIES:COERCE-NAME "bordeaux-threads") 2: COERCE-NAME returned "bordeaux-threads" 1: FIND-COMPONENT returned #<ASDF:SYSTEM {1F7DBD8}> 1: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1F7DBD8}>) 1: COMPONENT-PARENT returned NIL 1: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1F7DBD8}>) 1: COMPONENT-PARENT returned NIL 1: (ASDF::TRAVERSE #<ASDF:COMPILE-OP {AE4F8B}> #<ASDF:SYSTEM {1F7DBD8}>) 2: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1F7DBD8}>) 2: COMPONENT-PARENT returned NIL 2: (ASDF-UTILITIES:COERCE-NAME :ALEXANDRIA) 2: COERCE-NAME returned "alexandria" 2: (ASDF:FIND-COMPONENT NIL "alexandria" NIL) 3: (ASDF-UTILITIES:COERCE-NAME "alexandria") 3: COERCE-NAME returned "alexandria" 3: (ASDF-UTILITIES:COERCE-NAME "alexandria") 3: COERCE-NAME returned "alexandria" 3: (ASDF-UTILITIES:COERCE-NAME "alexandria") 3: COERCE-NAME returned "alexandria" 3: (ASDF-UTILITIES:COERCE-NAME "alexandria") 3: COERCE-NAME returned "alexandria" 3: (ASDF-UTILITIES:COERCE-NAME "alexandria") 3: COERCE-NAME returned "alexandria" 2: FIND-COMPONENT returned #<ASDF:SYSTEM {1768B0A}> 2: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1F7DBD8}>) 2: COMPONENT-PARENT returned NIL 2: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 2: COMPONENT-PARENT returned NIL 2: (ASDF::TRAVERSE #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:SYSTEM {1768B0A}>) 3: (ASDF::TRAVERSE #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:STATIC-FILE {7E05C4}>) 4: (ASDF:OUTPUT-FILES #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:STATIC-FILE {7E05C4}>) 4: OUTPUT-FILES returned NIL T 3: TRAVERSE returned NIL 3: (ASDF::TRAVERSE #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:STATIC-FILE {1AC8B37}>) 4: (ASDF:OUTPUT-FILES #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:STATIC-FILE {1AC8B37}>) 4: OUTPUT-FILES returned NIL T 3: TRAVERSE returned NIL 3: (ASDF::TRAVERSE #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:CL- SOURCE-FILE {F2DB2D}>) 4: (ASDF:OUTPUT-FILES #<ASDF:COMPILE-OP {1E8614A}> #<ASDF:CL-SOURCE-FILE {F2DB2D}>) 5: (ASDF:COMPONENT-PATHNAME #<ASDF:CL-SOURCE-FILE {F2DB2D}>) 6: (ASDF:COMPONENT-RELATIVE-PATHNAME #<ASDF:CL-SOURCE- FILE {F2DB2D}>) 7: (ASDF:COMPONENT-PARENT #<ASDF:CL-SOURCE-FILE {F2DB2D}>) 7: COMPONENT-PARENT returned #<ASDF:SYSTEM {1768B0A}> 7: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 7: COMPONENT-PARENT returned NIL 7: (ASDF:COMPONENT-PARENT #<ASDF:CL-SOURCE-FILE {F2DB2D}>) 7: COMPONENT-PARENT returned #<ASDF:SYSTEM {1768B0A}> 7: (ASDF:COMPONENT-PATHNAME #<ASDF:SYSTEM {1768B0A}>) 8: (ASDF:COMPONENT-RELATIVE-PATHNAME #<ASDF:SYSTEM {1768B0A}>) 9: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 9: COMPONENT-PARENT returned NIL 9: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 9: COMPONENT-PARENT returned NIL 8: COMPONENT-RELATIVE-PATHNAME returned #P"/ebs/ source/library/net/common-lisp/alexandria/" 8: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 8: COMPONENT-PARENT returned NIL 8: (ASDF-UTILITIES:TRUENAMIZE #P"/ebs/source/ metadata/net/common-lisp/bordeaux-threads/") 8: TRUENAMIZE returned #P"/ebs/source/metadata/net/ common-lisp/bordeaux-threads/" 8: (PATHNAME #P"/ebs/source/library/net/common- lisp/alexandria/") 8: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/" 8: (PATHNAME #P"/ebs/source/metadata/net/common- lisp/bordeaux-threads/") 8: PATHNAME returned #P"/ebs/source/metadata/net/ common-lisp/bordeaux-threads/" 8: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/alexandria/") 8: PATHNAME-DEVICE returned NIL 7: COMPONENT-PATHNAME returned #P"/ebs/source/ library/net/common-lisp/alexandria/" 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/alexandria/") 7: PATHNAME-DEVICE returned NIL 6: COMPONENT-RELATIVE-PATHNAME returned #P"./ package.lisp" 6: (ASDF:COMPONENT-PARENT #<ASDF:CL-SOURCE-FILE {F2DB2D}>) 6: COMPONENT-PARENT returned #<ASDF:SYSTEM {1768B0A}> 6: (ASDF:COMPONENT-PATHNAME #<ASDF:SYSTEM {1768B0A}>) 7: (ASDF:COMPONENT-RELATIVE-PATHNAME #<ASDF:SYSTEM {1768B0A}>) 8: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 8: COMPONENT-PARENT returned NIL 8: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 8: COMPONENT-PARENT returned NIL 7: COMPONENT-RELATIVE-PATHNAME returned #P"/ebs/ source/library/net/common-lisp/alexandria/" 7: (ASDF:COMPONENT-PARENT #<ASDF:SYSTEM {1768B0A}>) 7: COMPONENT-PARENT returned NIL 7: (ASDF-UTILITIES:TRUENAMIZE #P"/ebs/source/ metadata/net/common-lisp/bordeaux-threads/") 7: TRUENAMIZE returned #P"/ebs/source/metadata/net/ common-lisp/bordeaux-threads/" 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/" 7: (PATHNAME #P"/ebs/source/metadata/net/common-lisp/ bordeaux-threads/") 7: PATHNAME returned #P"/ebs/source/metadata/net/ common-lisp/bordeaux-threads/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/alexandria/") 7: PATHNAME-DEVICE returned NIL 6: COMPONENT-PATHNAME returned #P"/ebs/source/library/ net/common-lisp/alexandria/" 6: (PATHNAME #P"./package.lisp") 6: PATHNAME returned #P"./package.lisp" 6: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/") 6: PATHNAME returned #P"/ebs/source/library/net/common- lisp/alexandria/" 6: (PATHNAME-DEVICE #P"/ebs/source/library/net/common- lisp/alexandria/") 6: PATHNAME-DEVICE returned NIL 5: COMPONENT-PATHNAME returned #P"/ebs/source/library/ net/common-lisp/alexandria/package.lisp" 5: (ASDF::LISPIZE-PATHNAME #P"/ebs/source/library/net/ common-lisp/alexandria/package.lisp") 5: LISPIZE-PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.lisp" 5: (COMPILE-FILE-PATHNAME #P"/ebs/source/library/net/ common-lisp/alexandria/package.lisp") 5: COMPILE-FILE-PATHNAME returned #P"/ebs/source/library/ net/common-lisp/alexandria/package.abcl" 5: (ASDF:APPLY-OUTPUT-TRANSLATIONS #P"/ebs/source/ library/net/common-lisp/alexandria/package.abcl") 6: (ASDF-UTILITIES:TRUENAMIZE #P"/ebs/source/library/ net/common-lisp/alexandria/package.abcl") 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"ebs/") 7: PATHNAME returned #P"ebs/" 7: (PATHNAME #P"/") 7: PATHNAME returned #P"/" 7: (PATHNAME-DEVICE #P"/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"source/") 7: PATHNAME returned #P"source/" 7: (PATHNAME #P"/ebs/") 7: PATHNAME returned #P"/ebs/" 7: (PATHNAME-DEVICE #P"/ebs/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"library/") 7: PATHNAME returned #P"library/" 7: (PATHNAME #P"/ebs/source/") 7: PATHNAME returned #P"/ebs/source/" 7: (PATHNAME-DEVICE #P"/ebs/source/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"net/") 7: PATHNAME returned #P"net/" 7: (PATHNAME #P"/ebs/source/library/") 7: PATHNAME returned #P"/ebs/source/library/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"common-lisp/") 7: PATHNAME returned #P"common-lisp/" 7: (PATHNAME #P"/ebs/source/library/net/") 7: PATHNAME returned #P"/ebs/source/library/net/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"alexandria/") 7: PATHNAME returned #P"alexandria/" 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/") 7: PATHNAME-DEVICE returned NIL 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/package.abcl") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl" 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/" 7: (PATHNAME-DEVICE #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl") 7: PATHNAME-DEVICE returned NIL 6: TRUENAMIZE returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl" 6: (PATHNAME-MATCH-P #P"/ebs/source/library/net/common- lisp/alexandria/package.abcl" #P"/home/asdf/.cache/common-lisp/ armedbear-0.19.1-linux-unknown/**/*.*") 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/package.abcl") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl" 7: (PATHNAME #P"/home/asdf/.cache/common-lisp/ armedbear-0.19.1-linux-unknown/**/*.*") 7: PATHNAME returned #P"/home/asdf/.cache/common- lisp/armedbear-0.19.1-linux-unknown/**/*.*" 6: PATHNAME-MATCH-P returned NIL 6: (PATHNAME-MATCH-P #P"/ebs/source/library/net/common- lisp/alexandria/package.abcl" #P"/:jar:file/**/*.*") 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/package.abcl") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl" 7: (PATHNAME #P"/:jar:file/**/*.*") 7: PATHNAME returned #P"/:jar:file/**/*.*" 6: PATHNAME-MATCH-P returned NIL 6: (PATHNAME-MATCH-P #P"/ebs/source/library/net/common- lisp/alexandria/package.abcl" #P"jar:file:/**/*.jar!/**/*.*") 7: (PATHNAME #P"/ebs/source/library/net/common-lisp/ alexandria/package.abcl") 7: PATHNAME returned #P"/ebs/source/library/net/ common-lisp/alexandria/package.abcl" 7: (PATHNAME #P"jar:file:/**/*.jar!/**/*.*") 7: PATHNAME returned #P"jar:file:/**/*.jar!/**/*.*" 6: PATHNAME-MATCH-P returned T 6: (PATHNAME-DEVICE #P"/ebs/source/library/net/common- lisp/alexandria/package.abcl") 6: PATHNAME-DEVICE returned NIL 6: (NAMESTRING NIL) Debugger invoked on condition of type TYPE-ERROR: The value NIL is not of type (OR PATHNAME STRING FILE-STREAM). Restarts: 0: RETRY Retry loading component :ALEXANDRIA. 1: RETRY Retry loading component "bordeaux-threads". 2: TOP-LEVEL Return to top level. [3] CL-USER(64): asdf::*output-translations* (((#P"/home/asdf/.cache/common-lisp/armedbear-0.19.1-linux-unknown/**/ *.*" #P"/home/asdf/.cache/common-lisp/armedbear-0.19.1-linux-unknown/ **/*.*") (#P"/:jar:file/**/*.*" #P"/home/asdf/.cache/common-lisp/ armedbear-0.19.1-linux-unknown/**/*.*") (#P"jar:file:/**/*.jar!/**/ *.*" #<FUNCTION ASDF::TRANSLATE-JAR-PATHNAME {170B6D}>) (#P"/**/*.*" #P"/home/asdf/.cache/common-lisp/armedbear-0.19.1-linux-unknown/**/ *.*")))

2 2

[asdf-devel] Last call before code freeze
by Faré 30 Apr '10

30 Apr '10

I'd like to freeze the main branch of ASDF tomorrow for anything but bug fixes and documentation updates. Is there anything any of you want to commit before the freeze? Or as an exception to the freeze. I'm thinking in particular of the stuff in asdf-ecl. Juanjo, do you think it should be merged with ASDF itself? Especially in the light of it being semi-useful on other platforms where fasls can be concatenated? It might make things nicer if there is only one file needed for ASDF. [ François-René ÐVB Rideau | Reflection&Cybernethics | http://fare.tunes.org ] Be humble, for you are made of earth. Be noble, for you are made of stars. — Serbian proverb

6 12

[asdf-devel] Confusing error message
by Juan Jose Garcia-Ripoll 23 Apr '10

23 Apr '10

> (asdf::ensure-source-registry) One and only one of :INHERIT-CONFIGURATION or :IGNORE-INHERITED-CONFIGURATION is required I had obviously forgotten one of those keywords. (:source-registry (:tree "/Users/jjgarcia/src/lisp/")) Why does not the missing keyword get interpreted as :IGNORE-...? Juanjo -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

1 0

[asdf-devel] ASDF 2.0 and beyond.
by Faré 21 Apr '10

21 Apr '10

Dear all, I think time has come to declare ASDF 2.0 in beta-test, and focus on releasing it before we get more features into it. If there are any bug fixes or improvements you think should definitely be in 2.0, please open a bug in launchpad and tag them as such (milestone: version 2), or otherwise make it prominent in your message on this mailing-list. I'd like to declare 2.0 frozen by the end of April 2010, and released by the end of May 2010. PS: after 2.0 is out, I'd like to resign from ASDF maintainership, to focus on XCVB (help welcome on that, too). Is anyone volunteering to replace me on ASDF? Juanjo and janderson both have had very good ideas, although in both cases, I think that there's a gap from the good idea to something that can be released as part of the build tool that everyone will use. Maybe we should start alternative branches on the git tree? [ François-René ÐVB Rideau | Reflection&Cybernethics | http://fare.tunes.org ] Being a graduate student is like becoming all of the Seven Dwarves. In the beginning you're Dopey and Bashful. In the middle, you are usually sick (Sneezy), tired (Sleepy), and irritable (Grumpy). But at the end, they call you Doc, and then you're Happy. — Ronald T. Azuma, http://www.cs.unc.edu/~azuma/hitch4.html

6 21

[asdf-devel] :ASDF-DEPENDENCIES implemented
by Juan Jose Garcia-Ripoll 20 Apr '10

20 Apr '10

It is a two-lines change that allows a defsystem form depend on a package that provides additional functionality, such as new system classes, new system options, new methods, etc. :ASDF-DEPENDENCIES ({system-name}*) fee.asd: (defsystem :fee :components ((:file "fee"))) foo.asd: (defsystem :foo :tests ((:system :faa)) :asdf-dependencies (:fee) :components ((:file "foo"))) > (load "asdf") ;;; Loading #P"/Users/jjgarcia/devel/asdf/asdf.fas" ;;; Loading #P"/Users/jjgarcia/lib/ecl-10.3.1/CMP.fas" ;;; Loading #P"/Users/jjgarcia/lib/ecl-10.3.1/sysfun.lsp" #P"/Users/jjgarcia/devel/asdf/asdf.fas" > (asdf:load-system :foo) ; loading system definition from /Users/jjgarcia/devel/asdf/foo.asd into ; #<ASDF0 package> ;;; Loading "/Users/jjgarcia/devel/asdf/foo.asd" ; loading system definition from /Users/jjgarcia/devel/asdf/fee.asd into ; #<ASDF1 package> ;;; Loading "/Users/jjgarcia/devel/asdf/fee.asd" ; registering #<SYSTEM :FEE 11882808> as FEE ;;; Loading "/Users/jjgarcia/.cache/common-lisp/ecl-10.3.1-darwin-x86/Users/jjgarcia/devel/asdf/fee.fas" ;;; ;;; Loaded prerequisite FEE ;;; ; registering #<SYSTEM :FOO 12258736> as FOO ;;; Loading "/Users/jjgarcia/.cache/common-lisp/ecl-10.3.1-darwin-x86/Users/jjgarcia/devel/asdf/foo.fas" #<ASDF:LOAD-OP NIL 9826760> -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

4 14

[asdf-devel] structured dependencies mechanism broken
by Juan Jose Garcia-Ripoll 18 Apr '10

18 Apr '10

I know there are bug reports in launchpad, and that this has been expelled from 2.0 as of not urgent fix, but seems the latest changes have broken it beyond fix. I was playing with the following system (yes, I know the syntax is wrong), to make :feature at some point more useful but a simple experiment reveals that the structure dependency is being pushed into the list returned by COMPONENT-DEPENDS-ON and that this list causes an error in COMPONENT-SELF-DEPENDENCIES. (defsystem :foo :components ((:file "foo1" :depends-on ((:feature :foo-method1))) (:file "foo2" :depends-on ((:feature (not :foo-method1)))))) * (asdf:load-system :foo) [...] ; file: /Users/jjgarcia/devel/asdf-decl/examples/feature/../../asdf.lisp (CERROR "Continue nonetheless." "Congratulations, you're the first ever user of FEATURE dependencies! Please contact the asdf-devel mailing-list.") 0] (continue) debugger invoked on a TYPE-ERROR: The value (:FEATURE :FOO-METHOD1) is not of type (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING SYMBOL CHARACTER). Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT] Exit debugger, returning to top level. (STRING= "foo1" (:FEATURE :FOO-METHOD1))[:EXTERNAL] 0] -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

2 1

[asdf-devel] TEST-OP made useful by declarative options
by Juan Jose Garcia-Ripoll 18 Apr '10

18 Apr '10

The attached patch adds a new option to DEFSYSTEM. This option is :TESTS test-list test-list = (:system system-name) | function-name system-name = keyword | string function-name = symbol | string The function name is a string designator that denotes a function with no arguments to be called. This string will be read using the standard I/O syntax only when the test is executed. This ensures that the mechanism works once the appropriate dependencies are loaded. The system name denotes a system that will be loaded when the TEST-OP operation is invoked. The patch can be improved with some tests done when executing DEFSYTEM instead of what it does now, which is to signal an error once the test is performed. The usual example follows. foo.asd: (defsystem :foo :tests ((:system "faa")) :components ((:file "foo"))) faa.asd: (defsystem :faa :tests ("faa::run-tests") :components ((:file "faa"))) foo.lisp: (defpackage "FOO") (in-package "FOO") (defun my-cos (a) (cos a)) faa.lisp: (defpackage "FAA") (in-package "FAA") (defun run-tests () (format t "~&;;;~%;;; MY-COS signals errors: ~A~%;;;" (handler-case (progn (foo::my-cos 'a) 'no) (error (c) 'yes)))) -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

2 6

[asdf-devel] Simplification of load operations
by Juan Jose Garcia-Ripoll 17 Apr '10

17 Apr '10

Right now we have a situation in which load-source-op is a second class citizen, rarely used, and for which nobody provides explicit dependencies. More precisely * Some compilers out there are just efficient compiling and loading source files. The operation is the same. * LOAD-OP can be viewed as a slightly more efficient version of an operation that loads sources. * Some users out there do not like compile-before-load procedure. * ASDF makes no promise that load-source-op will behave similarly as load-op. * Users define methods for load-op and not for load-source-op. * In practice the dependencies *must* be the same, for the philosophy of CL is that compiled and not compiled files behave similarly. * The only differences should be enforced to lay just in the compilation process. I attach a patch which merges both operations, leaving a trace of compatibility. * There is only one class, LOAD-OP. * The class has the promise that it will use the same dependencies when loading sources and binaries. * When imposing that one does compile the source before, the class issues an additional dependency on a compile-op, which may pull additional dependencies itself. * A global flag, *compile-before-loading* determines the overall behavior * A new function ASDF:LOAD-SOURCE-SYSTEM forces no compilation * The function LOAD-SYSTEM gets a flag, :compile that sets *compile-before-loading* * With these changes it is easy to get a sorted list of the components that make up a program. Furthermore, this list is guaranteed to work because we are using the same operation that we will use to load the files. (pprint (loop with asdf::*compile-before-loading* = nil for (op . component) in (asdf::traverse (make-instance 'load-op) (find-system "chunga")) collect (list (type-of op) (type-of component) (asdf::component-name component)))) * With this mechanism I can reimplement the fasl concatenation mechanism *without* using classes at all. Same goes for ECL's extensions. The patch is still not fully tested, but I submit it for discussion, so that ugly corners can be polished. Juanjo -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

1 1

[asdf-devel] :in-order-to
by Juan Jose Garcia-Ripoll 16 Apr '10

16 Apr '10

Who uses it? Out of 291 packages, the only uses seem to be - Defining TEST-OP operations (greate majority) - In a few tests, it solves a wrong ordering of files - In two, it deactivates operations by using FEATURE (obscure way to do it) The "paradigmatic" example of McClim cited here http://common-lisp.net/project/asdf/asdf.html#Common-attributes-of-componen… does not have a single occurrence of this word. The question is thus, is it really needed? Juanjo -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://tream.dreamhosters.com

3 7

[asdf-devel] ASDF 1.700
by Faré 16 Apr '10

16 Apr '10

I did a big rewrite of TRAVERSE and a bunch of other fixes. Can you try out ASDF 1.700 ? Note that this breaks POIU. I don't understand what POIU does to TRAVERSE and PARSE-COMPONENT-FORM. I will have to fix it since the reason why I'm interested in fixing TRAVERSE is to be able to use POIU to speed things up instead of having it waste 2 minutes just for TRAVERSE... [ François-René ÐVB Rideau | Reflection&Cybernethics | http://fare.tunes.org ] Thinking is the hardest work there is, which is probably the reason why so few engage in it. — Henry Ford

2 3

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

asdf-devel April 2010