))
					    ((= u8 (char-&gt;integer #\return))
					     (if (char-ready? port)
						 (next)
						 'more))
					    ((= u8 (char-&gt;integer #\newline))
					     (make-outstring))
					    (else
					     (append-byte! u8)
					     (if (char-ready? port)
						 (next)
						 'more))))))))
  (let next ((res (await)))
    (if (eq? res 'more)
	(next (await))
	(begin
	  (g-source-remove id)
	  (release-port-handle port)
	  res))))
</pre></div>
</dd></dl>

<dl class="def">
<dt id="index-await_002dglib_002dg