line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package SOAP::WSDL::XSD::Typelib::Builtin::double; |
2
|
38
|
|
|
38
|
|
21365
|
use strict; |
|
38
|
|
|
|
|
75
|
|
|
38
|
|
|
|
|
1308
|
|
3
|
38
|
|
|
38
|
|
222
|
use warnings; |
|
38
|
|
|
|
|
79
|
|
|
38
|
|
|
|
|
1205
|
|
4
|
38
|
|
|
38
|
|
1247
|
use Class::Std::Fast::Storable constructor => 'none', cache => 1; |
|
38
|
|
|
|
|
26072
|
|
|
38
|
|
|
|
|
302
|
|
5
|
38
|
|
|
38
|
|
5695
|
use base qw(SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType); |
|
38
|
|
|
|
|
86
|
|
|
38
|
|
|
|
|
5206
|
|
6
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
sub as_num :NUMERIFY { |
8
|
1
|
|
|
1
|
0
|
213
|
return $_[0]->get_value(); |
9
|
38
|
|
|
38
|
|
252
|
} |
|
38
|
|
|
|
|
92
|
|
|
38
|
|
|
|
|
456
|
|
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
Class::Std::initialize(); # make :NUMERIFY overloading serializable |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
1; |