worker (make-event-loop))
(event-loop-block! #t)        ;; because the task runs in another thread
(event-loop-block! #t worker)

(call-with-new-thread
 (lambda ()
   (event-loop-run! worker)))

(a-sync (lambda (await resume)
	  (let ((res
		 (await-task-in-event-loop! await resume worker
					    (lambda ()
					      (+ 5 10)))))
	    (simple-format #t &quot;~A\n&quot; res)
	    (event-loop-block! #f worker)
	    (event-loop-block! #f))))
(event-loop-run!)
</pre></div>
</dd></dl>

<dl class="def">
<dt id=