Branch Coverage

blib/lib/Signals/XSIG.pm
Criterion Covered Total %
branch 107 142 75.3


line true false branch
43 12 0 if (defined ${^GLOBAL_PHASE}) { }
44 0 325 if ${^GLOBAL_PHASE} eq 'DESTRUCT'
54 0 12 if $_INITIALIZED
56 0 12 if ($Signals::XSIG::Config{'PERL_VERSION'} <= 6)
65 48 780 if (defined $z[$num[$i]])
83 12 840 if $sig eq 'ZERO'
84 0 840 unless (eval { do { tied(@{$_XSIG{$sig};})->_refresh_SIG; 1 } })
121 0 25 if &__inGD()
136 31 155 unless defined $subhandler
137 6 149 if $subhandler eq ''
138 125 24 if ($start != 0)
141 15 134 if $subhandler eq 'IGNORE'
142 5 129 if ($subhandler eq 'DEFAULT') { }
143 0 5 if ($start == 0)
144 0 0 if ($ignore_main_default)
147 0 0 if defined $_
0 0 if (0 != grep({$_ ne '' if defined $_;} @handlers))
151 1 4 if $seen_default++
155 6 123 unless defined &$subhandler
157 0 123 if ($signal =~ /__\w+__/) { }
177 15373 878 if (defined $sig)
181 840 38 unless $_INITIALIZED
184 10 28 unless ($DISABLE_WARNINGS)
185 0 10 if (defined $sig and $sig =~ /\d/ and not $sig =~ /\D/) { }
0 10 elsif (warnings::enabled('signal')) { }
200 0 6263 wantarray ? :
203 0 6263 wantarray ? :
214 35 227 if (not defined $handler or $handler eq '' or $handler eq 'IGNORE' or $handler eq 'DEFAULT')
221 18 209 if (substr($handler, 0, 1) eq '*') { }
244 302 5973 if $XDEBUG
252 8 2126 if $XDEBUG and $key ne '__DIE__'
254 2127 7 if (_resolve_signal($key)) { }
255 8 2119 if $XDEBUG and $key ne '__DIE__'
259 0 7 if $XDEBUG and $key ne '__DIE__'
266 4 3395 if $XDEBUG and $key ne '__DIE__'
268 3397 2 if (_resolve_signal($key)) { }
274 0 2 if $XDEBUG
286 0 4 if $XDEBUG and $key ne '__DIE__'
288 3 1 if (_resolve_signal($key)) { }
290 0 3 if $XDEBUG
295 0 1 if $XDEBUG
303 2 1 if ($XDEBUG)
319 2 1 if $XDEBUG
322 2 1 if ($XDEBUG)
331 0 1697 if $XDEBUG and $key ne '__DIE__'
338 0 2 if $XDEBUG
340 0 2 if $XDEBUG
346 0 142 if $XDEBUG
351 300 5960 if $XDEBUG and not &__inGD()
378 2 5689 if $index < 0
396 250 4217 if $XDEBUG
403 804 4555 if $_REFRESH == 0
410 5015 469 unless defined $handlers[$i]
411 1 468 if $handlers[$i] eq 'DEFAULT' and $seen_default++
412 3 465 if $handlers[$i] eq 'IGNORE' and $seen_ignore++
417 4315 240 if (@index_list == 0) { }
181 59 elsif (@index_list == 1 and $seen_default == 0 || ref $DEFAULT_BEHAVIOR{$sig} eq '') { }
431 0 59 if ($sig eq '__WARN__') { }
0 59 elsif ($sig eq '__DIE__') { }
441 250 4305 if $XDEBUG
463 0 0 if $index < $self->{'start'}
470 0 4 if $index < 0
495 1 4 if (@{$self->{'handlers'};} + $self->{'start'} <= 1)
505 2 2 if ($self->{'start'} >= 0)
516 2 5 if (@{$self->{'handlers'};} + $self->{'start'} <= 0)
540 48 804 if (defined $alias{$key} and not defined $alias{"pk:$key"})
556 0 10273 if ($key ne $key2 and not $self->{'copied'}) { }
0 10273 elsif ($self->{'copied'}) { }
572 0 29 if (ref $value ne 'ARRAY')
626 142 2 if (_resolve_signal($xsig, 1)) { }
627 8 134 if ($osig ne $xsig) { }