- 浏览: 12942 次
- 性别:
- 来自: 西安
最新评论
文章列表
1.(let ((x 'a))
(do ((x 1 (+ x 1))
(y x x))
((> x 5))
(format t "(~A ~A) " x y)))
输出为:(1 A) (2 1) (3 2) (4 3) (5 4)
NIL
2.(let ((x 'a))
(do ((x 1 (+ x 1))
(y x))
((> x 5))
(format t "(~A ~A) " x y)))
输出为:(1 A) (2 A) (3 A) (4 A) (5 A ...