[armedbear-devel] SETF for JFEILDS

[logicmoo at gmail.com]

Hi,

Could we add add something like this to java.lisp?

(defun (setf jfield) 
   (newvalue class-ref-or-field field-or-instance &optional ( instance :noinst) (value :novalue)) 
   (if (eq instance :noinst) 
     (jfield class-ref-or-field field-or-instance newvalue) 
     (jfield class-ref-or-field field-or-instance instance newvalue))) 

-Thx