Branch Coverage

blib/lib/Coro/Debug.pm
Criterion Covered Total %
branch 0 130 0.0


line true false branch
132 0 0 if (my($coro) = grep(($_ == $pid), &Coro::State::list())) { }
151 0 0 if $v < 10000
153 0 0 if $v < 1000000
154 0 0 if $v < 9950000
155 0 0 if $v < 1000000000
156 0 0 if $v < 9950000000
157 0 0 if $v < 1000000000000
158 0 0 if $v < 9950000000000
159 0 0 if $v < 1000000000000000
186 0 0 if $level <= $ERRLOGLEVEL
219 0 0 unless defined $loglevel
222 0 0 if (eval { do { &Coro::State::trace($coro, 12); 1 } }) { }
235 0 0 ref $_ ? :
236 0 0 if 43 < length $x
239 0 0 $_[0] ? :
0 0 $_[0] ? :
0 0 $_[2] ? :
270 0 0 $flags =~ /w/u ? :
271 0 0 $times ? :
272 0 0 $times ? :
273 0 0 $times ? :
284 0 0 if $frame[2]
285 0 0 unless $bt[0] =~ /^Coro/u
288 0 0 if @bt and not $verbose
289 0 0 $coro->is_ready ? :
0 0 $coro->is_running ? :
0 0 $coro->is_new ? :
0 0 $coro->has_cctx ? :
0 0 $coro->is_traced ? :
0 0 $times ? :
0 0 @bt ? :
315 0 0 if ($cmd =~ /^ps (?:\s* (\S+))? $/ux) { }
0 0 elsif ($cmd =~ /^bt\s+(\d+)$/u) { }
0 0 elsif ($cmd =~ /^(?:e|eval)\s+(\d+)\s+(.*)$/u) { }
0 0 elsif ($cmd =~ /^(?:tr|trace)\s+(\d+)$/u) { }
0 0 elsif ($cmd =~ /^(?:ut|untrace)\s+(\d+)$/u) { }
0 0 elsif ($cmd =~ /^cancel\s+(\d+)$/u) { }
0 0 elsif ($cmd =~ /^ready\s+(\d+)$/u) { }
0 0 elsif ($cmd =~ /^kill\s+(\d+)(?:\s+(.*))?$/u) { }
0 0 elsif ($cmd =~ /^enable_times(\s+\S.*)?\s*$/u) { }
0 0 elsif ($cmd =~ /^help$/u) { }
0 0 elsif ($cmd =~ /^(.*)&$/u) { }
319 0 0 if (my $coro = find_coro($1))
325 0 0 if ($bt) { }
333 0 0 if (my $coro = find_coro($1))
337 0 0 $@ ? :
341 0 0 if (my $coro = find_coro($1))
346 0 0 if (my $coro = find_coro($1))
351 0 0 if (my $coro = find_coro($1))
356 0 0 if (my $coro = find_coro($1))
361 0 0 defined $2 ? :
363 0 0 if (my $coro = find_coro($1))
368 0 0 defined $1 ? :
372 0 0 $enable ? :
401 0 0 $@ ? :
410 0 0 $@ ? :
432 0 0 unless $_[0] <= $loglevel
439 0 0 if ($cmd =~ /^exit\s*$/u) { }
0 0 elsif ($cmd =~ /^(?:ll|loglevel)\s*(\d+)?\s*/u) { }
0 0 elsif ($cmd =~ /^(?:w|watch)\s*([0-9.]*)\s+(.*)/u) { }
0 0 elsif ($cmd =~ /^help\s*/u) { }
444 0 0 defined $1 ? :
510 0 0 unless &AnyEvent::Socket::tcp_server('unix/', $path, sub { my($fh) = @_; $unlink_guard; &Coro::async_pool(sub { $Coro::current->desc('[Coro::Debug session]'); &session($fh); } ); } )
532 0 0 unless &AnyEvent::Socket::tcp_server(undef, $port, sub { my($fh) = @_; &Coro::async_pool(sub { $Coro::current->desc('[Coro::Debug session]'); &session($fh); } ); } )
538 0 0 if exists $self->{'path'}