(let ((q (make-q)))
(set! speaker (speak-it))
(enq! q (wrap (local-func-gets-break #:with-indirection #t)))
(start-agenda (make-agenda #:queue q)
#:stop-condition (true-after-n-times 10))
(let ((q (make-q)))
(set! speaker (speak-it))
(enq! q (wrap (local-func-gets-break #:with-indirection #t)))
(start-agenda (make-agenda #:queue q)
#:stop-condition (true-after-n-times 10))