File Coverage

blib/lib/Test/Unit/Listener.pm

Criterion	Covered	Total	%
statement	9	31	29.0
branch			n/a
condition			n/a
subroutine	3	9	33.3
pod	0	6	0.0
total	12	46	26.0

package Test::Unit::Listener;
use Test::Unit::Loader;
use Carp;
use strict;

sub new {
    my $class = shift;
    croak "call to abstract constructor ${class}::new";
}

sub start_suite {
    my $self = shift;
    my $class = ref($self);
    my ($suite) = @_;
    croak "call to abstract method ${class}::start_suite";
}

sub start_test {
    my $self = shift;
    my $class = ref($self);
    my ($test) = @_;
    croak "call to abstract method ${class}::start_test";
}

sub add_error {
    my $self = shift;
    my $class = ref($self);
    my ($test, $exception) = @_;
    croak "call to abstract method ${class}::add_error";
}

sub add_failure {
    my $self = shift;
    my $class = ref($self);
    my ($test, $exception) = @_;
    croak "call to abstract method ${class}::add_failure";
}

sub end_test {
    my $self = shift;
    my $class = ref($self);
    my ($test) = @_;
    croak "call to abstract method ${class}::end_test";
}

1;
__END__