1 Jan 2008 16:28
Re: ASDF test-op
Gary King <gwking <at> metabang.com>
2008-01-01 15:28:20 GMT
2008-01-01 15:28:20 GMT
Hi Robert,
I think that your proposal(s) are both steps in the right direction.
Just to clarify (and to think out load), there are two issues we'd
like to solve:
1. allow ASDF to communicate the results of an operation back to the
caller
2. control the stream to which ASDF sends output during an operation
In particular, we'd like to do this for test-ops but other ops could
also make use of this.
The most general solution might be to
1. add a generic function:
(defgeneric output-stream-for-component-and-operation (component
operation))
2. add an `output-stream` slot to operation
3. add an around method to perform
(defmethod perform :around ((operation operation) (c component))
(let ((*standard-output* (output-stream-for-operation-and-component
operation component)))
(call-next-method)))
4. and a "default" value for output-stream-for-component-and-operation
(Continue reading)
RSS Feed