Branch Coverage

blib/lib/Math/Complex_C/L.pm
Criterion Covered Total %
branch 22 48 45.8


line true false branch
80 0 1 unless defined $im
82 0 1 if $re =~ /^(\+|\-)?nan/i
83 0 1 if $im =~ /^(\+|\-)?nan/i
85 0 1 if ($re =~ /^(\+|\-)?inf/i)
86 0 0 if ($re =~ /^\-inf/i) { }
90 0 1 if ($im =~ /^(\+|\-)?inf/i)
91 0 0 if ($re =~ /^\-inf/i) { }
102 0 7 if ($real == 0) { }
4 3 elsif ($real != $real) { }
0 3 elsif ($real / $real != $real / $real) { }
103 0 0 $real =~ /^\-/ ? :
109 0 0 $real < 0 ? :
119 0 7 if ($imag == 0) { }
4 3 elsif ($imag != $imag) { }
0 3 elsif ($imag / $imag != $imag / $imag) { }
120 0 0 $imag =~ /^\-/ ? :
126 0 0 $imag < 0 ? :
150 9 53 unless (@_)
152 0 53 if (@_ > 3)
157 10 43 if (not ref $_[0] and $_[0] eq 'Math::Complex_C::L')
159 2 8 unless (@_)
162 0 51 if (@_ > 2)
166 51 0 if (@_ == 2) { }
171 0 0 if _itsa($_[0]) == 226