Re: [asdf-devel] Advanced Configuration

2013-11-16 Thread FAU
Ok so I've come up with something which seems to work. Please have a look at this. Is this a viable solution? Again here's the foo.lisp file: ;;; foo.lisp (defpackage :foo (:use :cl) (:export :foo)) (in-package :foo) (defun foo () #+foo1.0 :foo1.0 #+foo1.1 :foo1.1 ) ;;;

Re: [asdf-devel] Advanced Configuration

2013-11-16 Thread Faré
On Sat, Nov 16, 2013 at 5:21 PM, FAU f...@riseup.net wrote: (defmethod output-files ((operation compile-op) (component foo-file)) (let ((l (multiple-value-list (call-next-method (apply #'values (mapcar #'(lambda (p) (make-pathname* :directory (append

Re: [asdf-devel] Advanced Configuration

2013-11-16 Thread FAU
I corrected it to your advice accordingly. (defmethod output-files ((operation compile-op) (component foo-file)) (multiple-value-bind (pathnames translatep) (call-next-method) (values (mapcar #'(lambda (p) (make-pathname* :directory (append (pathname-directory

Re: [asdf-devel] Advanced Configuration

2013-11-11 Thread Faré
On Mon, Nov 11, 2013 at 2:40 AM, FAU f...@riseup.net wrote: I'd like to find out if I can do this with ASDF. (defun foo () #+foo1.0 :foo1.0 #+foo1.1 :foo1.1 ) As you can see the behaviour of the fn foo depends on version request features (which, lets say, represents the API

Re: [asdf-devel] Advanced Configuration

2013-11-11 Thread FAU
Hello Faré, Thanks for your comments. I downloaded asdf-source-in-package.lisp which may provide a good starting point. Thanks, Frank On Mon, 2013-11-11 at 04:01 -0500, Faré wrote: On Mon, Nov 11, 2013 at 2:40 AM, FAU f...@riseup.net wrote: I'd like to find out if I can do this with ASDF.