Branch Coverage

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


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+\*$//)