On Mon, Nov 23, 2009 at 2:36 PM, logicmoo@gmail.com wrote:
Does anyone object to adding this to java.lisp? If not could it be done?
(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)))
It seems a nice idea to me, but there are a couple of things that I don't understand:
- why :noinst and not simply nil? - value is not used, what's the point of it?
A.
----- Original Message ----- From: dmiles@users.sourceforge.net To: "Armed Bear" armedbear-devel@common-lisp.net Sent: Tuesday, November 10, 2009 12:24 AM Subject: SETF for JFEILDS
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
armedbear-devel mailing list armedbear-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/armedbear-devel