annotate _test/ORM.t @ 246:2746a8e5a6c4
Fixed regressions in DOM due previous refactorings
Fixed ObjectToDOM transformation to handle a schema with mixed node types
| author |
sergey |
| date |
Tue, 30 Oct 2012 01:17:31 +0400 |
| parents |
76515373dac0 |
| children |
|
| 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(
|
|
165
|
10
|
|
49
|
11 );
|
|
|
12
|
|
165
|
13 #Test::ORM::Schema
|
|
|
14
|
|
49
|
15 $plan->AddListener(new IMPL::Test::TAPListener);
|
|
|
16 $plan->Prepare();
|
|
|
17 $plan->Run();
|
|
|
18
|
|
|
19 1;
|
