I want to define a component class PORT-FILE, to be used like this:
:components ((port-file "ccl" :when :ccl)
(port-file "clisp" :when :clisp)
(port-file "sbcl-x86" :when (and :sbcl :x86))
...)
The implementation I have adds AROUND methods for
PERFORM (LOAD-OP PORT-FILE)
PERFORM (LOAD-SOURCE-OP PORT-FILE)
PERFORM (COMPILE-OP SOURCE-FILE)
and does CALL-NEXT-METHOD only if the feature test passes -- which
seems to work well enough, but is there a better place to hook into?
Cheers,
-- Nikodemus
_______________________________________________
asdf-devel mailing list
[email protected]
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel
