| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package ExtUtils::XSpp::Typemap::wrapper; |
|
2
|
|
|
|
|
|
|
|
|
3
|
1
|
|
|
1
|
|
943
|
use base 'ExtUtils::XSpp::Typemap'; |
|
|
1
|
|
|
|
|
1
|
|
|
|
1
|
|
|
|
|
6
|
|
|
4
|
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
sub init { |
|
6
|
2
|
|
|
2
|
0
|
11
|
my $this = shift; |
|
7
|
2
|
|
|
|
|
4
|
my %args = @_; |
|
8
|
|
|
|
|
|
|
|
|
9
|
2
|
|
|
|
|
8
|
$this->{TYPEMAP} = $args{typemap}; |
|
10
|
|
|
|
|
|
|
} |
|
11
|
|
|
|
|
|
|
|
|
12
|
1
|
|
|
1
|
1
|
4
|
sub type { shift->{TYPEMAP}->type( @_ ) } |
|
13
|
2
|
|
|
2
|
1
|
4
|
sub cpp_type { shift->{TYPEMAP}->cpp_type( @_ ) } |
|
14
|
0
|
|
|
0
|
1
|
0
|
sub input_code { shift->{TYPEMAP}->input_code( @_ ) } |
|
15
|
0
|
|
|
0
|
0
|
0
|
sub precall_code { shift->{TYPEMAP}->precall_code( @_ ) } |
|
16
|
1
|
|
|
1
|
1
|
3
|
sub output_code { shift->{TYPEMAP}->output_code( @_ ) } |
|
17
|
0
|
|
|
0
|
1
|
0
|
sub cleanup_code { shift->{TYPEMAP}->cleanup_code( @_ ) } |
|
18
|
1
|
|
|
1
|
1
|
3
|
sub call_parameter_code { shift->{TYPEMAP}->call_parameter_code( @_ ) } |
|
19
|
1
|
|
|
1
|
1
|
2
|
sub call_function_code { shift->{TYPEMAP}->call_function_code( @_ ) } |
|
20
|
2
|
|
|
2
|
0
|
5
|
sub output_list { shift->{TYPEMAP}->output_list( @_ ) } |
|
21
|
|
|
|
|
|
|
|
|
22
|
3
|
|
|
3
|
0
|
19
|
sub typemap { $_[0]->{TYPEMAP} } |
|
23
|
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
1; |