Mercurial > pub > Impl

annotate _test/DOM.t @ 37:c2e7f7c96bcd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
performance improvements, DOM reworked (a little)
author Sergey
date Mon, 23 Nov 2009 00:59:06 +0300
parents a8086f85a571
children 16ada169ca75
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11
75980091813b DOM и навигация
Sergey
parents:
diff changeset
1 #!/usr/bin/perl -w
75980091813b DOM и навигация
Sergey
parents:
diff changeset
2 use strict;
75980091813b DOM и навигация
Sergey
parents:
diff changeset
3 use lib '../Lib';
75980091813b DOM и навигация
Sergey
parents:
diff changeset
4 use lib '.';
75980091813b DOM и навигация
Sergey
parents:
diff changeset
5
75980091813b DOM и навигация
Sergey
parents:
diff changeset
6 use IMPL::Test::Plan;
75980091813b DOM и навигация
Sergey
parents:
diff changeset
7 use IMPL::Test::TAPListener;
75980091813b DOM и навигация
Sergey
parents:
diff changeset
8
75980091813b DOM и навигация
Sergey
parents:
diff changeset
9 my $plan = new IMPL::Test::Plan qw(
18
818c74b038ae DOM Schema + tests
Sergey
parents: 14
diff changeset
10 Test::DOM::Node
11
75980091813b DOM и навигация
Sergey
parents:
diff changeset
11 Test::DOM::Navigator
19
1ca530e5c9c5 DOM схема, требует переработки в части схемы для описания схем. Автоверификация не проходит
Sergey
parents: 18
diff changeset
12 Test::DOM::Schema
34
a8086f85a571 Dom Builder
Sergey
parents: 19
diff changeset
13 Test::DOM::Builder
11
75980091813b DOM и навигация
Sergey
parents:
diff changeset
14 );
75980091813b DOM и навигация
Sergey
parents:
diff changeset
15
75980091813b DOM и навигация
Sergey
parents:
diff changeset
16 $plan->AddListener(new IMPL::Test::TAPListener);
75980091813b DOM и навигация
Sergey
parents:
diff changeset
17 $plan->Prepare();
75980091813b DOM и навигация
Sergey
parents:
diff changeset
18 $plan->Run();