line |
true |
false |
branch |
21
|
0 |
197 |
if $alias =~ /\s/ |
22
|
0 |
197 |
unless $alias =~ /^[A-Za-z0-9_]+$/ |
25
|
0 |
197 |
if defined $self->type_map->{$alias} or $self->types->{$alias} |
41
|
654 |
1380 |
if defined $self->types->{$name} |
44
|
1278 |
61 |
unless ($name =~ /-\>/ or $name =~ /^record\s*\([0-9A-Z:a-z_]+\)$/ or $name =~ /^string(_rw|_ro|\s+rw|\s+ro|\s*\([0-9]+\))$/) |
49
|
357 |
921 |
if ($basic =~ s/\s*((\*|\[|\<).*)$//) |
53
|
1243 |
35 |
if (defined $self->type_map->{$basic}) |
56
|
149 |
1094 |
if ($new_name ne $name) |
64
|
41 |
1190 |
if ($name =~ /^ \( (.*) \) \s* -\> \s* (.*) \s* $/x) |
71
|
11 |
1179 |
if ($name =~ /^ string \s* \( ([0-9]+) \) $/x) |
79
|
67 |
1112 |
if ($name =~ /^ string ( _rw | _ro | \s+ro | \s+rw | ) $/x) |
81
|
7 |
60 |
defined $1 && $1 =~ /rw/ ? : |
86
|
6 |
1106 |
if ($name =~ /^ record \s* \( ([0-9]+) \) $/x) |
94
|
33 |
1073 |
if ($name =~ /^ record \s* \( ([0-9:A-Za-z_]+) \) $/x) |
98
|
0 |
33 |
unless ($classname->can("ffi_record_size") or $classname->can("_ffi_record_size")) |
104
|
2 |
31 |
if ($classname->can('ffi_record_size')) { } |
|
31 |
0 |
elsif ($classname->can('_ffi_record_size')) { } |
124
|
207 |
866 |
if ($name =~ /^([\S]+)\s+ \[ ([0-9]*) \] $/x) |
128
|
183 |
24 |
if ($size) { } |
145
|
81 |
785 |
if ($name =~ s/\s+\*$//) |