clojure：我如何使用while/loop with sleep

Question

我想每秒调用一次函数。

我有以下代码：

(defn dostuff [] 
    (do 
    (print "I'm doing stuff") 
    ...)) 

(while true 
    (Thread/sleep 1000) 
    (dostuff)) 

我希望它可以打印出“我做的东西，”每一秒，但事实并非如此。

我该如何做到这一点？

Answer 1

你不会冲洗标准输出。您可以使用的println，这是print加newline（力自动冲洗），或明确调用flush这样的：

(defn dostuff [] 
    (do 
    ... 
    (print "I'm doing stuff") 
    (flush)))