1use Test::More tests => 6;
2use strict;
3use warnings;
4use SOAP::WSDL::XSD::Typelib::Builtin::unsignedLong;
5my $unsignedLong = SOAP::WSDL::XSD::Typelib::Builtin::unsignedLong->new();
6ok defined $unsignedLong;
7ok $unsignedLong->set_value('127');
8ok $unsignedLong = SOAP::WSDL::XSD::Typelib::Builtin::unsignedLong->new({ value => 127 });
9is $unsignedLong * 1, 127, 'numerification';
10is "$unsignedLong", "127", 'stringification';
11
12ok $unsignedLong->isa('SOAP::WSDL::XSD::Typelib::Builtin::nonNegativeInteger'), 'inheritance';