1use Test::More qw(no_plan);
2use SOAP::Lite;
3
4ok my $schema = SOAP::Schema::WSDL->new();
5
6my $element = SOAP::Custom::XML::Data
7        -> SOAP::Data::name('schema')
8        -> set_value(
9            SOAP::Custom::XML::Data
10                -> SOAP::Data::name('complexType')
11                ->attr({ name => 'test' })
12);
13
14my @result = SOAP::Schema::WSDL::parse_schema_element( $element );
15is @result, 0, 'empty elements on empty complexType'
16
17