blib/lib/FFI/Platypus/Lang/Pascal.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 16 | 0.0 |
line | true | false | branch |
---|---|---|---|
251 | 0 | 0 | if $symbol1 =~ /^THREADVARLIST_/ |
252 | 0 | 0 | unless $symbol1 =~ /^[A-Z0-9_]+(\$[A-Z0-9_]+)*(\$\$[A-Z0-9_]+)?$/ |
255 | 0 | 0 | if $symbol =~ s/\$\$([A-Z_]+)$// |
258 | 0 | 0 | if $ret |
267 | 0 | 0 | if ($symbol =~ /^(.+)\((.*)\)$/) { } |
0 | 0 | elsif ($symbol =~ /^(.+)\((.*)\):(.*)$/) { } | |
286 | 0 | 0 | if ($mangle{$name}) |
288 | 0 | 0 | if (@{$mangle{$name};} == 1) { } |