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