view Lib/IMPL/Test/HarnessRunner.pm @ 312:75a78cbf7dcf

View refactoring: INIT blocks are deprecated
author cin
date Mon, 29 Apr 2013 01:10:42 +0400
parents 5c82eec23bb6
children
line wrap: on
line source

package IMPL::Test::HarnessRunner;
use strict;
use warnings;

use parent qw(IMPL::Object IMPL::Object::Autofill IMPL::Object::Serializable);

use TAP::Parser;
use Test::Harness;

__PACKAGE__->PassThroughArgs;


sub CTOR {
    my $this = shift;
}

sub RunTests {
    my ($this,@files) = @_;
    
    return runtests(@files);
}

sub ExecuteTests {
    my ($this,%args) = @_;
    
    return Test::Harness::execute_tests(%args);
}

1;