On Wed 18 Jan 2012 00:26, Tobias Brandt <tob.bra...@googlemail.com> writes:
>> 0. I'm sure there is another way, but my mind blanks at the moment > > After you got me started, I was able to simplify and generalize it a bit. > (-> is a GOOPS generic accessor I defined elsewhere. It works with > vectors, arrays, strings, etc ...) > (define-syntax with-accessors (lambda (stx) (syntax-case stx () > ((_ (id ...) exp ...) #`(begin #,@(let (;; checks if My eyes!!! ;-) Can you repost, but without having your editor wrap the lines? Thanks :) Andy -- http://wingolog.org/
