Branch Coverage

blib/lib/Math/Float32.pm
Criterion Covered Total %
branch 83 136 61.0


line true false branch
81 9020 0 if @_ > 0 and not ref $_[0] and _itsa($_[0]) == 4 and $_[0] eq "Math::Float32"
82 11 9011 unless (@_)
83 0 9011 if @_ > 1
85 9011 0 if ($itsa)
87 78 8933 if $itsa == 4 and $_[0] =~ /^(\s+)?[\-\+]?0b/i
95 0 1 if @_ != 2
97 0 1 if ($itsa == 22) { }
106 1 100 if $itsa == 22
107 100 0 if ($itsa < 5)
109 1 99 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
113 0 0 if $itsa == 20
119 64 77 if $itsa == 22
120 77 0 if ($itsa < 5)
122 1 76 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
126 0 0 if $itsa == 20
132 2 179 if $itsa == 22
133 179 0 if ($itsa < 5)
135 2 177 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
139 0 0 if $itsa == 20
145 0 107 if $itsa == 22
146 107 0 if ($itsa < 5)
148 2 105 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
152 0 0 if $itsa == 20
158 10 2 if $itsa == 22
159 2 0 if ($itsa < 5)
161 2 0 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
165 0 0 if $itsa == 20
171 0 28 if $itsa == 22
172 28 0 if ($itsa < 5)
174 2 26 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
178 0 0 if $itsa == 20
183 1 1 if $_[0] < 0
189 8662 0 if ($itsa == 22 or $itsa < 5)
191 2 8660 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
195 0 0 if $itsa == 20
201 14 0 if ($itsa == 22 or $itsa < 5)
203 0 14 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
207 0 0 if $itsa == 20
213 26 0 if ($itsa == 22 or $itsa < 5)
215 2 24 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
219 0 0 if $itsa == 20
225 66 0 if ($itsa == 22 or $itsa < 5)
227 4 62 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
231 0 0 if $itsa == 20
237 28 0 if ($itsa == 22 or $itsa < 5)
239 2 26 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
243 0 0 if $itsa == 20
249 66 0 if ($itsa == 22 or $itsa < 5)
251 4 62 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
255 0 0 if $itsa == 20
261 48 0 if ($itsa == 22 or $itsa < 5)
263 2 46 if $itsa == 4 and $_[1] =~ /^(\s+)?[\-\+]?0b/i
267 0 0 if ($itsa == 20)
269 0 0 unless defined $ret
280 3 0 if ($_[0] == 0)
281 1 2 if flt_signbit($_[0])
288 6 7 if hex substr(unpack_flt_hex($_[0]), 0, 1) >= 8
300 0 8284 if length $arg != 8 or $arg =~ /[^0-9a-fA-F]/
304 4142 4142 if substr($binstr, 0, 1) eq 1
307 4142 4142 if ($power < -126)
324 0 152 if $arg =~ /[^0-9peb\.\-\+]/i
327 61 91 if $arg =~ /^\-/
343 104 48 if $args[0] =~ /\./
348 8 144 if ($args[0] =~ s/^0\.//)
355 30 122 unless $args[0] =~ /1/
362 44 78 if ($pad)
365 24 20 if $point_index < 0
375 52 70 if $point_index < 0