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 );