blib/lib/Data/Monad/CondVar.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 27 | 32 | 84.3 |
line | true | false | branch |
---|---|---|---|
14 | 0 | 271 | if $_[0]->ready |
76 | 2 | 256 | unless &Scalar::Util::blessed($_[0]) and $_[0]->isa('AnyEvent::CondVar') |
105 | 0 | 9 | unless $result_cv |
110 | 0 | 1 | unless $result_cv |
155 | 541 | 0 | if @_ |
161 | 6 | 683 | if (my $old_cb = $self->cb) { } |
183 | 19 | 237 | if ($@) |
190 | 10 | 198 | $@ ? : |
207 | 4 | 4 | if (not $@) { } |
4 | 0 | elsif ($@ =~ /\Q$ZERO\E/u) { } | |
213 | 1 | 2 | $@ ? : |
232 | 43 | 20 | unless my $exception = $@ |
239 | 1 | 19 | if $@ |
244 | 1 | 17 | $@ ? : |
287 | 12 | 3 | if not $ok |
299 | 1 | 3 | $fail ? : |