On Tue, Nov 24, 2009 at 10:27 PM, logicmoo@gmail.com wrote:
Thanks, you are right, much better to use the built-in key stuff
(defun (setf jfield) (newvalue class-ref-or-field field-or-instance &optional ( instance nil instance-supplied-p) unused-value) (declare (ignore unused-value)) (if instance-supplied-p (jfield class-ref-or-field field-or-instance instance newvalue) (jfield class-ref-or-field field-or-instance newvalue)))
I have tentatively included this code in java.lisp in my local copy of abcl, with the intention to commit it to trunk. It works like a charm, but I have a problem: how can I tell abcl to autoload java.lisp if it sees (setf (jfield ...)) for the first time?
Bye, Ale