Mercurial > pub > Impl
comparison lib/IMPL/Test/HarnessRunner.pm @ 411:ee36115f6a34 ref20150831
sync
| author | cin |
|---|---|
| date | Mon, 21 Sep 2015 00:53:10 +0300 |
| parents | c6e90e02dd17 |
| children |
comparison
equal
deleted
inserted
replaced
| 410:9335cf010b23 | 411:ee36115f6a34 |
|---|---|
| 1 package IMPL::Test::HarnessRunner; | 1 package IMPL::Test::HarnessRunner; |
| 2 use strict; | 2 use strict; |
| 3 use warnings; | 3 use warnings; |
| 4 | 4 |
| 5 use parent qw(IMPL::Object IMPL::Object::Autofill IMPL::Object::Serializable); | |
| 6 | |
| 7 use TAP::Parser; | 5 use TAP::Parser; |
| 8 use Test::Harness; | 6 use Test::Harness; |
| 9 | 7 |
| 10 __PACKAGE__->PassThroughArgs; | 8 use IMPL::declare { |
| 11 | 9 base => [ |
| 12 | 10 'IMPL::Object' => undef, |
| 13 sub CTOR { | 11 'IMPL::Object::Serializable' => undef |
| 14 my $this = shift; | 12 ] |
| 15 } | 13 }; |
| 16 | 14 |
| 17 sub RunTests { | 15 sub RunTests { |
| 18 my ($this,@files) = @_; | 16 my ($this,@files) = @_; |
| 19 | 17 |
| 20 return runtests(@files); | 18 return runtests(@files); |
