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-serv12562/tests
188.8.131.52: Fix PRINT-OBJECT for RANDOM-STATE
* Discovered by Hans Hubner, reported by madnificient on #lisp.
RCS file: /cvsroot/sbcl/sbcl/tests/print.impure.lisp,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -d -r1.44 -r1.45
--- print.impure.lisp 4 Dec 2009 17:59:49 -0000 1.44
+++ print.impure.lisp 26 Apr 2010 23:15:10 -0000 1.45
@@ -472,4 +472,11 @@
(format nil "~A" (make-instance 'a-class-name)))
+;;; The PRINT-OBJECT method for RANDOM-STATE used to have a bogus
+;;; dimension argument for MAKE-ARRAY.
+(with-test (:name :print-random-state)
+ (assert (equalp *random-state*
+ (write-to-string *random-state*)))))
Sign up for the SourceForge newsletter: