Mercurial > pub > Impl
annotate _test/run_tests.pl @ 4:e59f44f75f20
DOM - в разработке
Testing - по мелочи
Property - изменен механизм выбора имплементора
| author | Sergey |
|---|---|
| date | Wed, 12 Aug 2009 17:36:07 +0400 |
| parents | |
| children | 818c74b038ae |
| rev | line source |
|---|---|
| 4 | 1 #!/usr/bin/perl |
| 2 use strict; | |
| 3 use warnings; | |
| 4 | |
| 5 use IMPL::Test::HarnessRunner; | |
| 6 use IMPL::Test::Straps; | |
| 7 | |
| 8 my $runner = new IMPL::Test::HarnessRunner( | |
| 9 Strap => new IMPL::Test::Straps () | |
| 10 ); | |
| 11 | |
| 12 $runner->Strap->Executors( | |
| 13 { | |
| 14 Re => '.*', | |
| 15 Executor => $runner->Strap | |
| 16 } | |
| 17 ); | |
| 18 | |
| 19 $runner->RunTests(<*.t>); | |
| 20 | |
| 21 1; |