Hi Eric, > ,---- > | (defstruct foo one two) > | > | (handler-bind ((error (lambda (c) > | (let ((r (find-restart 'kernel::clobber-it c))) > | (when r (invoke-restart r)))))) > | (defstruct foo one two three)) > `----
i can avoid the error, but if i say ,-- | (make-foo :one 1 :two 2 :three 3) `-- the following error occures. ,-- |Structure for accessor FOO-ONE is not a FOO: `-- What do you think about this? Matthias -- Binary/unsupported file stripped by Listar -- -- Type: text/x-vcard -- File: mrinck.vcf -- Desc: Card for Matthias Rinck
