Mercurial > pub > Impl
comparison _test/Test/DOM/Builder.pm @ 232:5c82eec23bb6
Fixed degradations due refactoring
author | sergey |
---|---|
date | Tue, 09 Oct 2012 20:12:47 +0400 |
parents | 4267a2ac3d46 |
children |
comparison
equal
deleted
inserted
replaced
231:ff1e8fa932f2 | 232:5c82eec23bb6 |
---|---|
23 | 23 |
24 my $schema = new IMPL::DOM::Schema; | 24 my $schema = new IMPL::DOM::Schema; |
25 $schema->appendRange( | 25 $schema->appendRange( |
26 IMPL::DOM::Schema::ComplexNode->new( name => 'personInfo' )->appendRange( | 26 IMPL::DOM::Schema::ComplexNode->new( name => 'personInfo' )->appendRange( |
27 IMPL::DOM::Schema::NodeSet->new()->appendRange( | 27 IMPL::DOM::Schema::NodeSet->new()->appendRange( |
28 new IMPL::DOM::Schema::SimpleNode( name => 'firstName' ), | 28 IMPL::DOM::Schema::SimpleNode->new( name => 'firstName' ), |
29 new IMPL::DOM::Schema::SimpleNode( name => 'lastName' ), | 29 IMPL::DOM::Schema::SimpleNode->new( name => 'lastName' ), |
30 new IMPL::DOM::Schema::ComplexNode( name => 'address', maxOccur => 'unbounded' )->appendRange( | 30 IMPL::DOM::Schema::ComplexNode->new( name => 'address', maxOccur => 'unbounded' )->appendRange( |
31 IMPL::DOM::Schema::NodeSet->new()->appendRange( | 31 IMPL::DOM::Schema::NodeSet->new()->appendRange( |
32 new IMPL::DOM::Schema::SimpleNode( name => 'street' ), | 32 IMPL::DOM::Schema::SimpleNode->new( name => 'street' ), |
33 new IMPL::DOM::Schema::SimpleNode( name => 'line', minOccur => 0 ) | 33 IMPL::DOM::Schema::SimpleNode->new( name => 'line', minOccur => 0 ) |
34 ) | 34 ) |
35 ) | 35 ) |
36 ) | 36 ) |
37 ) | 37 ) |
38 ); | 38 ); |