dotimesの挙動

これは知らなかった。

(dotimes (a 10)
  (format t "~A " (incf a)))
|
1 3 5 7 9

dolistで使っているリストは関係なし。

(let ((l '(1 2 3 4 5)))
  (dolist (a l)
	(format t "~A ~A " a (setq l (cdr l)))))
|
1 (2 3 4 5) 2 (3 4 5) 3 (4 5) 4 (5) 5 nil