line |
true |
false |
branch |
33
|
0 |
72 |
unless $tmpdir |
38
|
1 |
71 |
if $ENV{'T2_KEEP_TEMPDIR'} |
62
|
1 |
34 |
unless my $type = &blessed($e) |
64
|
1 |
33 |
unless $type->isa('Test2::Event') |
79
|
1 |
84 |
if -e $hfile |
82
|
0 |
84 |
unless open my $fh, '>', $hfile |
94
|
1 |
55 |
unless -e $hfile |
97
|
0 |
55 |
unless open my $fh, '<', $hfile |
101
|
0 |
55 |
unless $pid == $$ |
104
|
0 |
55 |
unless 0 == $tid |
107
|
1 |
54 |
if ($ENV{'T2_KEEP_TEMPDIR'}) { } |
108
|
0 |
1 |
unless rename $hfile, 'File::Spec'->canonpath("$hfile.complete") |
111
|
0 |
54 |
unless unlink $hfile |
114
|
0 |
55 |
unless opendir my $dh, $tdir |
116
|
2 |
171 |
if $file =~ /\.complete$/ |
117
|
170 |
1 |
unless $file =~ /^$hid/ |
129
|
18 |
19 |
$global ? : |
131
|
2 |
35 |
unless $global or -f $hfile |
147
|
18 |
15 |
if ($global) |
155
|
0 |
32 |
unless rename $file, $ready |
158
|
1 |
32 |
unless ($ok) |
192
|
0 |
69 |
unless opendir my $dh, $tempdir |
196
|
138 |
158 |
if substr($file, 0, 1) eq '.' |
198
|
120 |
38 |
unless substr($file, -6, 6) eq '.ready' |
204
|
0 |
38 |
unless $have_hid or $global |
206
|
11 |
27 |
if $global and $self->{'globals'}{$hid}{$file}++ |
216
|
14 |
13 |
if $global |
219
|
1 |
12 |
if ($ENV{'T2_KEEP_TEMPDIR'}) { } |
220
|
0 |
1 |
unless rename $full, $complete |
223
|
0 |
12 |
unless unlink $full |
236
|
1 |
30 |
unless &blessed($obj) |
239
|
2 |
28 |
unless ($obj->isa('Test2::Event')) |
244
|
1 |
1 |
unless $ok |
247
|
1 |
0 |
unless $obj->isa('Test2::Event') |
269
|
1 |
54 |
unless defined $self->pid |
270
|
1 |
53 |
unless defined $self->tid |
272
|
2 |
51 |
unless $$ == $self->pid |
273
|
1 |
50 |
unless 0 == $self->tid |
277
|
0 |
50 |
unless opendir my $dh, $tempdir |
279
|
98 |
8 |
if $file =~ /^\.+$/ |
280
|
2 |
6 |
if $file =~ /\.complete$/ |
283
|
5 |
1 |
if ($file =~ /^(GLOBAL|HUB-)/) |
286
|
1 |
4 |
if $ENV{'T2_KEEP_TEMPDIR'} |
287
|
0 |
4 |
unless unlink $full |
295
|
1 |
48 |
if ($ENV{'T2_KEEP_TEMPDIR'}) |
300
|
0 |
48 |
unless rmdir $tempdir |