Clojure infinito loop

Question

Qual è il modo idiomatico per creare un ciclo infinito?

while(true){ 
    calc(); 
} 

Voglio chiamare la funzione di calcolo per sempre. Solo una funzione viene chiamata più e più volte.

MODIFICA: Un'altra cosa che ho dimenticato di menzionare è che il calc ha effetti collaterali. Fa alcuni calcoli e modifica un array di byte.

Answer 1

while è nelle librerie di base.

(while true (calc)) 

Si espande in un semplice recur.

(defmacro while 
    "Repeatedly executes body while test expression is true. Presumes 
    some side-effect will cause test to become false/nil. Returns nil" 
    [test & body] 
    `(loop [] 
    (when ~test 
     ~@body 
     (recur)))) 

Answer 2

(anello [] (calc) (ripresentarsi))

Answer 3

Utilizzando la while macro che Brian fornisce nella sua risposta si tratta di un compito semplice per scrivere una macro forever che non fa altro che scende il test booleano da while:

 
(defmacro forever [& body] 
    `(while true ~@body)) 

user=> (forever (print "hi "))       
hi hi hi hi hi hi hi hi hi hi hi .... 

Questa è la parte divertente di qualsiasi Lisp, è possibile creare le proprie strutture di controllo e in cambio si evita molto di boilerplate code.

Answer 4

Un'altra soluzione sarebbe quella di utilizzare come repeatedly:

(repeatedly calc) 

Piuttosto che un ciclo infinte, restituisce una sequenza infinita. La sequenza pigra sarà un po 'più lenta di un ciclo stretto, ma consente anche un certo controllo del ciclo.