Mercurial > pub > Impl
annotate _test/ORM.t @ 101:d8dc6cad3f55
Schema in progress
| author | wizard |
|---|---|
| date | Thu, 06 May 2010 17:55:59 +0400 |
| parents | 16ada169ca75 |
| children | 76515373dac0 |
| rev | line source |
|---|---|
| 49 | 1 #!/usr/bin/perl -w |
| 2 use strict; | |
| 3 use lib '../Lib'; | |
| 4 use lib '.'; | |
| 5 | |
| 6 use IMPL::Test::Plan; | |
| 7 use IMPL::Test::TAPListener; | |
| 8 | |
| 9 my $plan = new IMPL::Test::Plan qw( | |
| 10 Test::ORM::Schema | |
| 11 ); | |
| 12 | |
| 13 $plan->AddListener(new IMPL::Test::TAPListener); | |
| 14 $plan->Prepare(); | |
| 15 $plan->Run(); | |
| 16 | |
| 17 1; |