line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package XML::Validator::Schema::ComplexTypeNode; |
2
|
5
|
|
|
5
|
|
29
|
use strict; |
|
5
|
|
|
|
|
9
|
|
|
5
|
|
|
|
|
157
|
|
3
|
5
|
|
|
5
|
|
27
|
use warnings; |
|
5
|
|
|
|
|
10
|
|
|
5
|
|
|
|
|
136
|
|
4
|
|
|
|
|
|
|
|
5
|
5
|
|
|
5
|
|
25
|
use base 'XML::Validator::Schema::ElementNode'; |
|
5
|
|
|
|
|
16
|
|
|
5
|
|
|
|
|
760
|
|
6
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
=head1 NAME |
8
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
XML::Validator::Schema::ComplexTypeNode |
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
=head1 DESCRIPTION |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
This is an internal module used by XML::Validator::Schema to represent |
14
|
|
|
|
|
|
|
complexType nodes derived from XML Schema documents. |
15
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
=cut |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
sub compile { |
19
|
0
|
|
|
0
|
0
|
|
my ($self) = shift; |
20
|
0
|
|
|
|
|
|
$self->SUPER::compile(); |
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
# register in the library if this is a named type |
23
|
0
|
0
|
|
|
|
|
$self->root->{type_library}->add(name => $self->{name}, |
24
|
|
|
|
|
|
|
obj => $self) |
25
|
|
|
|
|
|
|
if $self->{name}; |
26
|
|
|
|
|
|
|
} |
27
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
1; |