ot;)))
(a-sync (lambda (await resume)
	  (meeting-send await resume m1 &quot;Hello from a-sync2&quot;)))

(a-sync (lambda (await resume)
	  (let next ((count 0))
	    (when (&lt; count 2)
	      (display (meeting-receive await resume m1))
	      (newline)
	      (next (1+ count))))))
(event-loop-run!)
</pre></div>

<p>In addition, with version 0.15 of this library, only a single meeting
object could be passed to this procedure.  From version 0.16 this
procedure has &rsquo;select&rsquo;-like behavior: multip