annotate _test/DOM.t @ 103:c289ed9662ca
Schema beta 2
More strict validation, support for inflating a simple nodes and properties
| author |
wizard |
| date |
Fri, 07 May 2010 18:17:40 +0400 |
| parents |
16ada169ca75 |
| children |
44977efed303 |
| 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::DOM::Node
|
|
|
11 Test::DOM::Navigator
|
|
|
12 Test::DOM::Schema
|
|
|
13 Test::DOM::Builder
|
|
|
14 );
|
|
|
15
|
|
|
16 $plan->AddListener(new IMPL::Test::TAPListener);
|
|
|
17 $plan->Prepare();
|
|
|
18 $plan->Run();
|
