4.9.6. Thunk

Die Patternklasse thunk verwendet eine Funktion ohne Argumente, die bei einem Aufruf eine komplette Periode von Daten als Liste zurückgeben muss. Auf diese Weise ist es möglich, in einem verschachtelten Pattern bei jeder neuen Periode wieder mit dem Phrasenbeginn zu starten.

(next
 (let ((phrase '(dies ist ein test))
       (phrasenlaengen (new cycle :of '(1 2 3 4 3 2))))
   (new thunk :of (lambda () (next (new cycle of phrase :for (next phrasenlaengen)) t))))
 40)

;; -> (dies
;;     dies ist
;;     dies ist ein
;;     dies ist ein test
;;     dies ist ein
;;     dies ist
;;     dies
;;     dies ist
;;     dies ist ein
;;     dies ist ein test
;;     dies ist ein
;;     dies ist
;;     dies
;;     dies ist
;;     dies ist ein
;;     dies ist ein test)