Name: Anonymous 2012-07-03 22:57
Why
runs at 545,960 processor cycles (according to TIME), but
takes 2,221,300 processor cycles? does SBCL rolls the loop back or what? why inserting noise statements increases drawing speed?
(while (/= i e)
#.`(progn ,@(loop as i below 16 append '((setf (aref d i) color) (incf i)))))
(format nil "")
(dotimes (j (- l e)) (setf (aref d (f+ i j)) color))runs at 545,960 processor cycles (according to TIME), but
(while (/= i e)
#.`(progn ,@(loop as i below 16 append '((setf (aref d i) color) (incf i)))))
(dotimes (j (- l e)) (setf (aref d (f+ i j)) color))takes 2,221,300 processor cycles? does SBCL rolls the loop back or what? why inserting noise statements increases drawing speed?