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/src/code
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv4937/src/code
184.108.40.206: DOTIMES and non-integer counts
* For non-literal non-integer counts we already did the right thing,
but eg. literal floats slipped under the radar.
* Patch by Roman Marynchak, lp#619393.
RCS file: /cvsroot/sbcl/sbcl/src/code/defboot.lisp,v
retrieving revision 1.73
retrieving revision 1.74
diff -u -d -r1.73 -r1.74
--- defboot.lisp 21 Jun 2009 10:26:24 -0000 1.73
+++ defboot.lisp 30 Aug 2010 11:13:18 -0000 1.74
@@ -328,7 +328,7 @@
;;; ASAP, at the cost of being unable to use the standard
;;; destructuring mechanisms.
(defmacro-mundanely dotimes ((var count &optional (result nil)) &body body)
- (cond ((numberp count)
+ (cond ((integerp count)
`(do ((,var 0 (1+ ,var)))
((>= ,var ,count) ,result)
(declare (type unsigned-byte ,var))
Sign up for the SourceForge newsletter: