Red Hat Linux
Click URL instructions:
Right-click on ad, choose "Copy Link", then paste here →
(This may not be possible with some types of ads)
You seem to have CSS turned off.
Please don't fill out this field.
Briefly describe the problem (required):
Please provide the ad click URL, if possible:
Update of /cvsroot/sbcl/sbcl/tests
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv10477/tests
188.8.131.52: fix (SETF DOCUMENTATION) for macros
Patch Stas Boukarev, test-case by yours truly.
Nice and simple, so going in mid-freeze.
RCS file: /cvsroot/sbcl/sbcl/tests/interface.impure.lisp,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- interface.impure.lisp 28 Jul 2009 17:41:39 -0000 1.16
+++ interface.impure.lisp 21 Sep 2010 11:23:33 -0000 1.17
@@ -247,5 +247,14 @@
(flet ((zoo () (gogo)))
(defmethod gogo () nil)
+(defmacro bug-643958-test ()
+(with-test (:name :bug-643958)
+ (assert (equal "foo" (documentation 'bug-643958-test 'function)))
+ (setf (documentation 'bug-643958-test 'function) "bar")
+ (assert (equal "bar" (documentation 'bug-643958-test 'function))))
Sign up for the SourceForge newsletter: