如何正确等待n秒

Question

我想实现一个在发生故障时重试前等待n秒的函数，但是实现等待例程的正确方法是什么。

我认为带有if-clause的无限循环可能会导致不必要的CPU使用率。

(do ((time (+ (get-universal-time) (- n 1))) 
    (time-cur (get-universal-time) (get-universal-time))) 
    ((< time time-cur) nil)) 

因此：这会被认为是正确的代码还是有更标准的方法？

Answer 1

是不是SLEEP你在找什么？