Mercurial > pub > Impl

comparison _test/SQL.t @ 165:76515373dac0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:06:48 +0400
parents 16ada169ca75
children 6148f89bb7bf
comparison
equal deleted inserted replaced
164:eb3e9861a761 165:76515373dac0
1 #!/usr/bin/perl -w 1 #!/usr/bin/perl -w
2 use strict; 2 use strict;
3 use lib '../Lib'; 3 use lib '../Lib';
4 use lib '.'; 4 use lib '.';
5 5
6 use IMPL::Test::Plan; 6 use IMPL::Test qw(run_plan);
7 use IMPL::Test::TAPListener;
8 7
9 my $plan = new IMPL::Test::Plan qw( 8 run_plan( qw(
10 Test::SQL::Schema 9 Test::SQL::Schema
11 ); 10 Test::SQL::Traits
12 11 ) );
13 $plan->AddListener(new IMPL::Test::TAPListener);
14 $plan->Prepare();
15 $plan->Run();
16 12
17 1; 13 1;