Branch Coverage

blib/lib/TestML/Compiler.pm
Criterion Covered Total %
branch 24 38 63.1


line true false branch
20 0 42 if ($self->directives->{'DumpAST'})
45 178 600 unless length $part
46 321 279 if ($part =~ /^(\#.*|\ *)\n/)
50 50 229 if ($part =~ /^%(\w+)\s*(.*?)\s*\n/) { }
53 42 8 if ($directive eq 'TestML')
54 0 42 unless $value =~ /^\d+\.\d+\.\d+$/
57 0 42 if $self->directives->{'TestML'}
62 0 8 unless $self->directives->{'TestML'}
63 4 4 if ($directive eq 'Include') { }
4 0 elsif ($directive =~ /^(DataMarker|BlockMarker|PointMarker)$/) { }
0 0 elsif ($directive =~ /^(DebugPegex|DumpAST)$/) { }
64 0 4 unless my $runtime = $TestML::Runtime::Singleton
76 0 4 if $include->directives->{'TestML'}
82 0 0 unless length $value
90 0 229 if $input and not $self->directives->{'TestML'}
95 42 4 if ($top) { }
97 0 42 unless $self->directives->{'TestML'}
98 0 42 if $order_error
104 29 13 if ((my $split = index($input, "\n$DataMarker")) >= 0) { }