sub wait # simplified
{
    my $lambda = shift;
    $lambda-> start if $lambda-> is_passive;
    event_loop while not $lambda-> is_finished;
    return $lambda-> peek;
}

##</code><code>##

context $socket;
writable { Y }

##</code><code>##

syswrite $socket ....;
readable { Z }