## 迭代
有很多方法可以遍历一个集合。
宏 `dotimes` 会执行给定的表达式一定次数, 一个本地binding会被给定值：从0到一个给定的数值. 如果这个本地binding是不需要的 (下面例子里面的 `card-number` ), 可以用下划线来代替， 看例子:
```
(dotimes [card-number 3]
(println "deal card number" (inc card-number))) ; adds one to card-number
```
注意下上面例子里面的 `inc` 函数是为了让输出变成 1, 2, 3 而不是 0, 1, 2。上面代码的输出是这样的:
```
deal card number 1
deal card number 2
deal card number 3
```
宏 `while` 会一直执行一个表达式只要指定的条件为true. 下面例子里面的 `while` 会一直执行，只要这个线程没有停:
```
(defn my-fn [ms]
(println "entered my-fn")
(Thread/sleep ms)
(println "leaving my-fn"))
(let [thread (Thread. #(my-fn 1))]
(.start thread)
(println "started thread")
(while (.isAlive thread)
(print ".")
(flush))
(println "thread stopped"))
```
上面代码的输出是这样的:
```
started thread
.....entered my-fn.
.............leaving my-fn.
thread stopped
```
