Branch Coverage

blib/lib/FFI/Platypus/TypeParser/Version0.pm
Criterion Covered Total %
branch 35 40 87.5


line true false branch
21 0 194 if $alias =~ /\s/
22 0 194 unless $alias =~ /^[A-Za-z0-9_]+$/
25 0 194 if defined $self->type_map->{$alias} or $self->types->{$alias}
41 639 1362 if defined $self->types->{$name}
44 1260 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 351 909 if ($basic =~ s/\s*((\*|\[|\<).*)$//)
53 1225 35 if (defined $self->type_map->{$basic})
56 144 1081 if ($new_name ne $name)
64 41 1177 if ($name =~ /^ \( (.*) \) \s* -\> \s* (.*) \s* $/x)
71 11 1166 if ($name =~ /^ string \s* \( ([0-9]+) \) $/x)
79 66 1100 if ($name =~ /^ string ( _rw | _ro | \s+ro | \s+rw | ) $/x)
81 7 59 defined $1 && $1 =~ /rw/ ? :
86 6 1094 if ($name =~ /^ record \s* \( ([0-9]+) \) $/x)
94 33 1061 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 205 856 if ($name =~ /^([\S]+)\s+ \[ ([0-9]*) \] $/x)
128 182 23 if ($size) { }
145 80 776 if ($name =~ s/\s+\*$//)