File Coverage

blib/lib/UV/Stream.pm

Criterion	Covered	Total	%
statement	20	20	100.0
branch	1	2	50.0
condition			n/a
subroutine	6	6	100.0
pod	2	2	100.0
total	29	30	96.6

package UV::Stream;

our $VERSION = '1.901';

use strict;
use warnings;
use Carp ();
use parent 'UV::Handle';

sub listen
{
    my $self = shift;
    my ($backlog, $cb) = @_;

    $self->on(connection => $cb) if $cb;
    $self->_listen($backlog);
}

sub accept
{
    my $self = shift;

    my $client = (ref $self)->_new($self->loop);

    $self->_accept($client);

    return $client;
}

1;

__END__