| line |
true |
false |
branch |
|
68
|
0 |
3 |
if (my $error = $@) |
|
124
|
0 |
7 |
if (${$self->errput;}) |
|
132
|
4 |
3 |
if ($params{'blocking'}) { } |
|
140
|
3 |
0 |
if ($old_output eq ${$self->output;}) |
|
167
|
1 |
3 |
if ($self->_is_resuming) { } |
|
174
|
3 |
0 |
if (not defined $$command{'shell'}) { } |
|
200
|
3 |
24 |
if (exists $$expected_output{'command'}) |
|
207
|
2 |
1 |
if ($$expected_output{'command'} eq 'fastforward') { } |
|
|
0 |
1 |
elsif ($$expected_output{'command'} eq 'wait_less_than') { } |
|
|
1 |
0 |
elsif ($$expected_output{'command'} eq 'yield') { } |
|
229
|
0 |
0 |
$fastforwarding ? : |
|
|
0 |
24 |
if $$self{'debug'} |
|
241
|
0 |
24 |
if (my $error = $@) { } |
|
242
|
0 |
0 |
unless $error eq "alarm\n" |
|
247
|
0 |
24 |
if ($had_timeout) |
|
258
|
16 |
8 |
if ($$expected_output{'match_type'} eq 'literal') { } |
|
|
8 |
0 |
elsif ($$expected_output{'match_type'} eq 'regex') { } |
|
277
|
12 |
12 |
if ($fastforwarding) |
|
282
|
2 |
10 |
if ($details[$current_test - 1]{'ok'}) { } |
|
312
|
0 |
3 |
if (${$self->output;}) { } |
|
314
|
0 |
0 |
defined $$command{'shell'} ? : |
|
320
|
0 |
3 |
defined $$command{'shell'} ? : |
|
360
|
1 |
8 |
if ($line =~ /^#/) { } |
|
|
1 |
7 |
elsif ($line =~ /^$/) { } |
|
|
1 |
6 |
elsif ($line =~ /^ {4}\$ (.*)$/) { } |
|
|
4 |
2 |
elsif ($line =~ /^($output_prefix_re)(.*)$/) { } |
|
|
2 |
0 |
elsif ($line =~ /^($commands_re)\s*(.*)$/) { } |
|
364
|
1 |
0 |
if ($handle->input_line_number <= 1 and $line =~ /^#!/) |
|
393
|
0 |
4 |
unless (grep {exists $$_{'shell'};} @{$commands;}) |
|
410
|
0 |
2 |
unless (exists $valid_commands{$command}) |
|
419
|
0 |
2 |
unless ($command eq 'preamble' or grep {exists $$_{'shell'};} @{$commands;}) |
|
430
|
0 |
2 |
if ($parameters and not @parameters) |
|
441
|
1 |
1 |
if ($command eq 'preamble') { } |
|
|
0 |
1 |
elsif ($command eq 'wait_less_than') { } |
|
442
|
0 |
1 |
if (@{$commands;}) |
|
458
|
0 |
0 |
if (@parameters > 2 or @parameters < 1) { } |
|
|
0 |
0 |
elsif (@parameters == 2) { } |
|
465
|
0 |
0 |
if ($unit =~ /second(?:s)?/) { } |
|
|
0 |
0 |
elsif ($unit =~ /minute(?:s)?/) { } |
|
499
|
0 |
1 |
if (@errors) |